Du könntest ja sowas machen
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender : TObject);
begin
repeat
Memo1.Left := Memo1.Left -1;
sleep(10);
until
Memo.Left = -50;
end;
end;
Ist ungetestet aber so ungefähr sollte es gehn. Zumindest mit dem verschwinden. Das auftauchen ist ja praktisch das gleiche nur umgekehrt