HABS FAST
procedure TForm1.Button2Click(Sender: TObject);
var
session,s: string;
i: Integer;
begin
session:=WB1.OleObject.Document.Body.InnerHtml;
i := Pos('uebersicht.php?u=', session);
s := Copy(session, i + 17, Length(session) - i +7);
Memo1.Text := (s);
er soll jetzt aber von hinten gesehen 10 stellen ab "schneiden"