Utilizamos cookies propias y de terceros. Al navegar entendemos que aceptas el uso de cookies. +Info.
Política de cookies
Proyecto AjpdSoft

· Inicio
· Buscar
· Contactar
· Cookies
· Descargas
· Foros
· Historia
· Nosotros
· Temas
· Top 10
· Trucos
· Tutoriales
· Usuario
· Wiki

Nick


Contraseña


Nuevo usuario


English
Función para obtener el contenido HTML de una página web - Delphi
Lenguaje de programación Borland Delphi


Os mostramos una función realizada en Borland Delphi 6 para obtener el contenido de una página web. Se le pasa como parámetro una URL y devuelve un string (cadena de texto) con el código HTML de la URL indicada. Para realizar esta función necesitaremos algunas de la librería Indy, que ha de estar instalada en Delphi.


En la clausula USES del formulario añadiremos "IdHTTP":

function ObtenerWeb(webIP : string) : string;
var
  obtenerHTTP : TidHTTP;
  web : TStringList;
begin
  web := TStringList.Create;
  obtenerHTTP := TidHTTP.Create(nil);
  try
    web.Text := obtenerHTTP.Get(webIP);
  except
    on e: exception do
    begin
      obtenerHTTP.Free;
    end;
  end;
  ObtenerWeb := web.Text;
end;
Un ejemplo de uso:
  txtContenidoHTML.Text := ObtenerWeb('http://www.ajpdsoft.com');




Publicado el: 2008-07-20

Este sitio web NO CONTIENE malware, todos los programas con código fuente aquí. Autor: Alonso Javier Pérez Díaz Google+ Síguenos en Google+