Absolute Position im Fenster

[freak4fun]

Delphi-Quellcode:

procedure TForm1.Edit1Enter(Sender: TObject);
begin
  ListBox1.Parent := (Sender As TEdit).Parent;
  ListBox1.Left := (Sender As TEdit).Left;
  ListBox1.Top := (Sender As TEdit).Top + (Sender As TEdit).Height;
end;

MfG
freak