Webbrowser
Alguien sabe como sacar el codigo fuente de una pagina web, con el control webbrowser en el borland builder 5.0???
Gracias
Gracias
Bueno en delphi para sacar el codigo html de un memo a un twebbroser hago lo siguiente:
primero crea las variables:
olekk : olevariant;
pBody : pchar;
sBody : string;
y a continuacion mete el codigo:
begin
if synmemo1.lines.count > 0 then
begin
webbrowser1.Navigate('about:blank');
while webbrowser1.ReadyState <> READYSTATE_COMPLETE do
Application.ProcessMessages;
olekk := webbrowser1.Document;
pBody := synmemo1.Lines.GetText;
sBody := StrPas(pBody);
olekk.writeln(sBody);
end;
end;
espero que te sirva de ayuda
primero crea las variables:
olekk : olevariant;
pBody : pchar;
sBody : string;
y a continuacion mete el codigo:
begin
if synmemo1.lines.count > 0 then
begin
webbrowser1.Navigate('about:blank');
while webbrowser1.ReadyState <> READYSTATE_COMPLETE do
Application.ProcessMessages;
olekk := webbrowser1.Document;
pBody := synmemo1.Lines.GetText;
sBody := StrPas(pBody);
olekk.writeln(sBody);
end;
end;
espero que te sirva de ayuda
