Foro de elhacker.net

Sistemas Operativos => GNU/Linux => Mensaje iniciado por: ¡Micronet! en 31 Diciembre 2011, 05:03 am



Título: Programar un Navegador web en Free Pascal (Linux)
Publicado por: ¡Micronet! en 31 Diciembre 2011, 05:03 am
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:

Citar
Free 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
  1. program NecroxWB;
  2.  
  3. uses
  4. Classes, LCLProc, LazHelpHTML;
  5.  
  6. implementation
  7.  
  8. procedure TMainForm.Button1Click(sender: TObject);
  9. var
  10. v: THTMLBrowserHelpViewer;
  11. BrowserPath, BrowserParams: string;
  12. p: LongInt;
  13. URL: String;
  14. BrowserProcess: TProcessUTF8;
  15. begin
  16. v:=THTMLBrowserHelpViewer.Create(nil);
  17.  try
  18.   v.FindDefaultBrowser(BrowserPath,BrowserParams);
  19.   debugln(['Path=', BrowserPath, ' Params=', BrowserParams]);      
  20.  
  21.   URL:='http://www.lazarus.freepascal.org';
  22.   p:=System.Pos('$s', BrowserParams);
  23.   System.Delete(BrowserParams, p, 2);
  24.   SYstem.Insert(URL, BrowserParams, p);
  25.  
  26.   //Start Browser
  27.   BrowserProcess:=TProcessUTF8.Create(nil);
  28.    try
  29.     BrowserProcess.COmmandLine:=BrowserPath+' '+BrowserParams;
  30.     BrowserProcess.Execute;
  31.    finally
  32.     BrowserProcess.Free;
  33.    end;
  34.  finally
  35.   v.Free;
  36.  end;
  37. end;
  38.  
  39.  
  40. begin
  41.  
  42. end.

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


Título: Re: Programar un Navegador web en Free Pascal (Linux)
Publicado por: 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.



Título: Re: Programar un Navegador web en Free Pascal (Linux)
Publicado por: ¡Micronet! en 2 Enero 2012, 00:36 am
¿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 :)