Panel aufscrollen lassen

[patti]

Du musst gar nicht unbedingt auf einen Timer zurückgreifen. Da das Aufscrollen zeitlich nur sehr kurz sein sollte, könntest du auch einfach Sleep; (oder eine entsprechende Alternative) benutzen. Beim einem Button-Click könntest du folgendes machen:

Delphi-Quellcode:

while panel1.width < 120 do
begin
   Panel1.Width := Panel1.Width + 2;
   Sleep(25);
end;

Das wäre jetzt mal ein Code fürs Aufscrollen. Das Einrollen solltest du dann alleine hinkriegen.

Patti