Programar un Navegador web en Free Pascal (Linux)

Iniciado por ¡Micronet!, 31 Diciembre 2011, 05:03 AM

0 Miembros y 1 Visitante están viendo este tema.

¡Micronet!

Por lo menos me gustaria crear un navegador web algo sencillo, que tenga para enviar a una pagina web, atras, adelante, cancelar, enviar...

Y que sea creado en Free Pascal... y conforme vaya avanzando... quisiera meterle un poco mas de dificultad para por lo menos haber trabajado tanto como para que se note, espero me puedan ayudar.

Empece con lo mas sencillo, que fue trabajar con el Webbroser de Lazarus:

http://wiki.lazarus.freepascal.org/Webbrowser


Intentando compilar por lo menos esa funcion el error me sale en:

CitarFree Pascal Compiler version 2.4.0-2ubuntu1.10.10 [2011/06/17] for i386
Copyright (c) 1993-2009 by Florian Klaempfl
Target OS: Linux for i386
Compiling Necrox0.1.pas
Fatal: Can't find unit LCLProc used by NecroxWB
Fatal: Compilation aborted
Error: /usr/bin/ppc386 returned an error exitcode (normal if you did not specify a source file to be compiled)

Encontre este para solucionarlo y poder continuar...

http://comments.gmane.org/gmane.comp.ide.lazarus.general/57247

Pero no me supo responder, espero me puedan ayudar
"Aqui publicare mi codigo que vaya creando y posteriormente subirlo ala comunidad Software Libre"

Hasta el momento estoy empezando con esa sencilla funcion espero me puedan ayudar, y tal como esta en la pagina donde empece, tal cual tengo el codigo:

Citar
Código (PASCAL) [Seleccionar]
program NecroxWB;

uses
Classes, LCLProc, LazHelpHTML;

implementation

procedure TMainForm.Button1Click(sender: TObject);
var
v: THTMLBrowserHelpViewer;
BrowserPath, BrowserParams: string;
p: LongInt;
URL: String;
BrowserProcess: TProcessUTF8;
begin
v:=THTMLBrowserHelpViewer.Create(nil);
 try
  v.FindDefaultBrowser(BrowserPath,BrowserParams);
  debugln(['Path=', BrowserPath, ' Params=', BrowserParams]);      
 
  URL:='http://www.lazarus.freepascal.org';
  p:=System.Pos('$s', BrowserParams);
  System.Delete(BrowserParams, p, 2);
  SYstem.Insert(URL, BrowserParams, p);

  //Start Browser
  BrowserProcess:=TProcessUTF8.Create(nil);
   try
    BrowserProcess.COmmandLine:=BrowserPath+' '+BrowserParams;
    BrowserProcess.Execute;
   finally
    BrowserProcess.Free;
   end;
 finally
  v.Free;
 end;
end;

   
begin

end.

Esperando continuar con mas... espero me puedan ayudar.

"La Tarea No Se Hace, Pero No Indica Que No Se Ayude Al Estudiante"

Gambinoh

¿Porqué en Pascal y no en C, hay alguna razón?

PD: Me parece una buena idea tu proyecto.


¡Micronet!

Cita de: Gambinoh en  1 Enero 2012, 20:50 PM
¿Porqué en Pascal y no en C, hay alguna razón?

PD: Me parece una buena idea tu proyecto.



Por que estoy acostumbrado a trabajar con el... aparte de que me gusta la idea de crear cosas con cosas que pocos usan :).

Aparte de que ya he trabajado con "Lexicografico de C" y con un "Parser de un programa para linux" y me gustaria especializarme en pascal y al mismo tiempo trabajar con C, conforme vaya avanzando ya que me gustaria perfeccionar mis lenguajes de programacion.

O de igual manera seria bueno trabajar en C, es mas factible de encontrar informacion en C?... para crear el navegador?... si es asi entonces me paso a C para crear mi navegador :D!. lo que yo busco es ayuda... para lograrlo :)

"La Tarea No Se Hace, Pero No Indica Que No Se Ayude Al Estudiante"