afficher contenu html sans charger fichier html

Question

bonjour,

Je cherche un composant qui affiche du contenu html comme TwebBrowser mais sans avoir à charger de fichier html. Juste en lui ajoutant des lignes de code html comme pour un Tmemo. Il faudrait qu'il se comporte de la même manière que Twebbrowser: pouvoir cliquer sur les liens de la page, des gifs, etc...

Ca existe?

f0xi · Answer

tu peu utilise le TWebBrowser en remplissant le OleContainer :

WebBrowser1.OleContainer.Document. blablabla

 La theorie c'est quand on sait tout, mais que rien ne fonctionne.
La pratique c'est quand tout fonctionne, mais que personne ne sait pourquoi.
<hr>

Bestdoud · Answer

apparement olecontainer n'existe pas avec le composant webbrowser

par contre  y a oleobject. mais je ne peux pas ecrire la suite

ELCouz · Answer

salut
assaye moi ceci.
ce qui te faut 2 bouttons , un memo, un web browser + Uses MSHTML, ActiveX, SHDocVw;

procedure TForm1.Button1Click(Sender: TObject);
var
  WebDoc: HTMLDocument;
  WebBody: HTMLBody;
begin
  WebDoc := Tform1.WebBrowser1.Document as HTMLDocument;
  WebBody := WebDoc.body as HTMLBody;
  WebBody.insertAdjacentHTML('BeforeEnd', Memo1.Text);
end;

procedure LoadHTML(WebBrowser: TWebBrowser; HTMLCode: string);
var
  sl: TStringList;
  ms: TMemoryStream;
begin
  WebBrowser.Navigate('about: pas grand chose :P');
  while WebBrowser.ReadyState < READYSTATE_INTERACTIVE do
   Application.ProcessMessages;

  if Assigned(WebBrowser.Document) then
  begin
    sl := TStringList.Create;
    try
      ms := TMemoryStream.Create;
      try
        sl.Text := HTMLCode;
        sl.SaveToStream(ms);
        ms.Seek(0, 0);
        (WebBrowser.Document as IPersistStreamInit).Load(TStreamAdapter.Create(ms));
      finally
        ms.Free;
      end;
    finally
      sl.Free;
    end;
  end;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
  LoadHTML(webbrowser1,Memo1.Text);
end;

laurent

ELCouz · Answer

jai oublier de preciser que cest pour inserer du code html a la page deja afficher

laurent

Afficher contenu html sans charger fichier html

4 réponses

Votre réponse

Discussions similaires