runden Button

[sentinal]

Habe nun alles in einer extra Unit eingebaut, uses und implementation und so ergänzt und dann wollte ich einen erzeugen.

Code:

procedure TForm1.Button1Click(Sender: TObject);
  var btn: TRundBtn;
begin
  btn := TRundBtn.Create(Form1);
  btn.Width := 80;
  btn.Height := 89;
  btn.top := 80;
  btn.left := 89; 
  btn.show;
end;

Leider passiert nichts. Sonst ging es immer so. Ich muss zugeben, dass dies meine aktuellen Kenntnisse von Delphi überschreitet, da ich mich normal wenn ich was programmiere/scripte mit anderen Sprachen rumschlagen, die auch nicht in der (Turbo?)Pascal-Art sind.

sentinal