Einzelnen Beitrag anzeigen

marabu

Registriert seit: 6. Apr 2005
10.109 Beiträge
 
#3

Re: scrollen im twebbrowser

  Alt 2. Dez 2005, 06:26
Moin.

Wenn grundsätzlich das zuletzt hinten angefügte Element sichtbar sein soll, dann geht auch das hier:

Delphi-Quellcode:
procedure TDemoForm.ScrollDown(doc: IHTMLDocument2);
var
  ec: IHTMLElementCollection;
  v: OleVariant;
  e: IHTMLElement;
begin
  ec := Doc.body.children as IHTMLElementCollection;
  v := Pred(ec.length);
  e := ec.item(v, null) as IHTMLElement;
  if Assigned(e) then
    e.scrollIntoView(false);
end;
Grüße vom marabu
  Mit Zitat antworten Zitat