Witam,
Nigdy nie próbowałem robic nic z konstruktorem ale teraz zaszła potrzeba. Chciałbym utworzyc dynamicznie np. 10 komponentów typu TPanel, ustawic we wskazane na formie miejsce i potem moc definiowac do nich zdarzenia np. onClick().
Zrobiłem cos takiego, bledow program nie wyrzuca ale nic sie nie dzieje, pewnie to głupie ale wkleje.
procedure TMainForm.BitBtn5Click(Sender: TObject);
var
Panel : TPanel;
begin
Panel := TPanel.Create(MainForm);
try
Panel.Name := 'A11';
Panel.Left := 400;
Panel.Top := 400;
Panel.Width := 100;
Panel.Height := 100;
Panel.Color := clWhite;
Panel.Visible := True;
Panel.Enabled := True;
Panel.Show;
finally
Panel.Free;
end;
end;
To na razie samo konstruowanie jednego, i tak nie dziala. A co potem ze zdarzeniami itp?