Buscar
 
 

Resultados por:
 


Rechercher Búsqueda avanzada

Últimos temas
» Instalar el nuevo CFW Pro-C para psp (En español)
Jue Feb 19, 2015 8:25 am por Arselod

» PRO Online Client PSP
Mar Ene 20, 2015 11:51 pm por yizesito1545

» Duda se me reinicia mi psp
Lun Feb 10, 2014 6:31 am por Ruben Baez

» Como crear juegos firmados para psp 6.60
Sáb Ago 10, 2013 11:29 pm por arcangelcelulex

» Resistance Retribution PSP solo para grabar online
Dom Jul 07, 2013 6:56 pm por pirinpi

» Patapon 3 Online [Parche online] [Como jugar online]
Jue Mayo 09, 2013 7:09 pm por MisterChockz

» Remotejoy lite Ver 0.19 (Para ver el PSP en la Pc)
Dom Abr 28, 2013 8:51 pm por 3lcost3

» Cat Bros PSP (Cat Mario)
Jue Dic 20, 2012 12:27 am por TheMrSonic

» Plugin Manager PSP
Jue Jul 26, 2012 4:05 am por TheMrSonic

Navegación
 Portal
 Índice
 Miembros
 Perfil
 FAQ
 Buscar
Septiembre 2017
LunMarMiérJueVieSábDom
    123
45678910
11121314151617
18192021222324
252627282930 

Calendario Calendario

Los posteadores más activos de la semana


Navegador Web [Delphi]

Ver el tema anterior Ver el tema siguiente Ir abajo

Navegador Web [Delphi]

Mensaje por ZtuX el Dom Jul 31, 2011 9:14 am

Bien, hoy no tenia que hacer ["segun" porque despues recorde que tenia Tareas xD] y bien hice un navegador web con Este lenguaje [Delphi]. Es muy, muy básico pero funciona!!

Bien dejo el source:

Código:

unit Navegador;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, OleCtrls, SHDocVw, Menus;

type
  TForm1 = class(TForm)
    Edit1: TEdit;
    WebBrowser1: TWebBrowser;
    Go: TButton;
    Button1: TButton;
    Button2: TButton;
    Button3: TButton;
    MainMenu1: TMainMenu;
    Archivo1: TMenuItem;
    Salir1: TMenuItem;
    Button4: TButton;
    PginaInicio1: TMenuItem;
    procedure GoClick(Sender: TObject);
    procedure Button1Click(Sender: TObject);
    procedure Button2Click(Sender: TObject);
    procedure Button3Click(Sender: TObject);
    procedure Button4Click(Sender: TObject);
    procedure Salir1Click(Sender: TObject);
    procedure PginaInicio1Click(Sender: TObject);
    procedure Edit1Change(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.GoClick(Sender: TObject);
begin
WebBrowser1.Navigate(Edit1.Text);
end;

procedure TForm1.PginaInicio1Click(Sender: TObject);
begin
WebBrowser1.Navigate('[Tienes que estar registrado y conectado para ver este vínculo]
end;

procedure TForm1.Salir1Click(Sender: TObject);
begin
Form1.Close;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
WebBrowser1.GoBack;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
WebBrowser1.GoBack;
end;

procedure TForm1.Button3Click(Sender: TObject);
begin
WebBrowser1.Navigate('[Tienes que estar registrado y conectado para ver este vínculo]
end;

procedure TForm1.Button4Click(Sender: TObject);
begin
WebBrowser1.Refresh;
end;

procedure TForm1.Edit1Change(Sender: TObject);
begin
WebBrowser1.Navigate( Edit1.Text )
end;

end.

Y dejo el poyecto en un RAR, lo compile sobre en Delphi 2010!!
DESCARGAR: [Tienes que estar registrado y conectado para ver este vínculo]
NOTA: EL navegador tiene por nombre project1.exe, deje el nombre por defaul xD!!

Salud[OS]

ZtuX

Mensajes : 1
Fecha de inscripción : 31/07/2011

Ver perfil de usuario

Volver arriba Ir abajo

Re: Navegador Web [Delphi]

Mensaje por Lalo009k el Mar Ago 02, 2011 1:08 am

k bn, interesante

Lalo009k

Mensajes : 3
Fecha de inscripción : 25/03/2011

Ver perfil de usuario

Volver arriba Ir abajo

Re: Navegador Web [Delphi]

Mensaje por kuka27sfc el Mar Ago 02, 2011 2:30 am

que se supone que es eso??? un navegador de internet???

kuka27sfc

Mensajes : 6
Fecha de inscripción : 30/07/2011
Edad : 21

Ver perfil de usuario

Volver arriba Ir abajo

Re: Navegador Web [Delphi]

Mensaje por TheMrSonic el Mar Ago 02, 2011 3:01 am

kuka27sfc escribió:que se supone que es eso??? un navegador de internet???

sii es un navegador
avatar
TheMrSonic
Admin
Admin

Mensajes : 39
Fecha de inscripción : 21/03/2011
Edad : 20
Localización : Mexico

Ver perfil de usuario http://themrsonic.foroactivo.mx

Volver arriba Ir abajo

Re: Navegador Web [Delphi]

Mensaje por Contenido patrocinado


Contenido patrocinado


Volver arriba Ir abajo

Ver el tema anterior Ver el tema siguiente Volver arriba

- Temas similares

 
Permisos de este foro:
No puedes responder a temas en este foro.