Hi
Ich habe mir einen Typ von TPaintBox abgeleitet und erstelle dynamisch eine Instanz dieses Typs (MyPaintBox).
Zur Vereinfachung soll diese MyPaintBox in einem Panel mit alClient angezeigt werden, damit ich direkt im
OI regeln kann, wo es angezeigt werden soll...
das versuche ich so:
Delphi-Quellcode:
constructor TMyPaintBox.Create(AOwner: TComponent);
begin
inherited Create(AOwner);
Parent:=TWinControl(AOwner);
end;
procedure TForm1.FormCreate(Sender: TObject);
var i:Integer;
begin
PB:=TMyPaintBox.Create(Panel1);
PB.Align:=alClient;
PB.Show;
end;
aber ich kann dann malen was ich will....es passiert nichts.
Woran liegts?
Edit: Rechtschreibung
und Randomize hat hier nichts zu suchen....