Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by maximov,
7. Nov 2003
Wenn der aufruf per shortcut gemacht wird, gehe ich davon aus, dass du actions oder der gleichen beuntzt. Da actions aber keine visuellen componenten sind haben sie auch keine parent-suizid probleme :wink: ...weil sie als parent höchstens das formular haben.
mfg. mäxmov.
PS: @Choose: das mit dem 'WM_FREEVCLCONTROL' muss ich mir merken!
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by maximov,
6. Nov 2003
Geht schon musst nur sicherstellen, dass der button kein sub-object von dem panel mehr ist:
procedure TForm1.Button1MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
TButton(sender).Parent := nil;
Panel1.Free;
end;
procedure TForm1.Button1MouseUp(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);