erst einmal: schön dass du das nun auch mit dem quellcode formatieren hier im forum gefunden hast
Delphi-Quellcode:
procedure TForm1.FormDragDrop(Sender, Source: TObject; X, Y: Integer);
begin
TPanel(Source).left := x;
TPanel(Source).top := y;
TPanel(source).parent := TWinControl(Sender);
end;
bedeutet dass alle Nachfahren von TPanel auf deinem Formular gedroppt werden dürfen.
Wenn du jedoch
Delphi-Quellcode:
procedure TForm1.FormDragDrop(Sender, Source: TObject; X, Y: Integer);
begin
Panel1.left := x;
Panel1.top := y;
Panel1.parent := TWinControl(Sender);
end;
verwendest, erlaubst du nur dem Panel1 auf dem Form gedroppt zu werden.