Hallo Alexander,
Ich hoffe, Du verwechselst Parent und Owner nicht.
BringToFront funktioniert nur innerhalb einer Ebene, d.h. beide Control müssen den selben
Parent besitzen. Liegt auch nur eines der Controls auf einem weiteren TWinControl (z.B. TPanel), so funktioniert BringToFront nicht mehr.
Der folgende Code funktioniert bei mir einwandfrei:
Delphi-Quellcode:
procedure TForm1.Button5Click(Sender: TObject);
var TheLabel : TLabel;
TheShape : TShape;
begin
TheLabel := TLabel.Create(Self);
TheLabel.Parent := Self;
TheLabel.SetBounds (8, 8, 100, 30);
TheLabel.Caption := 'Hallo';
TheShape := TShape.Create(Self);
TheShape.Parent := Self;
TheShape.SetBounds (0, 0, 200, 100);
TheLabel.BringToFront;
end;
Gruß Hawkeye