hi, ich will eine klasse machen
mein ansatz:
Delphi-Quellcode:
...
TStein = class(TControl)
public
Pressed: Boolean;
constructor create;
property OnMouseDown;
property Caption;
property Color;
end;
var
Form1: TForm1;
test: TStein;
...
constructor TStein.Create(AOwner: TComponent);
begin
inherited Create(AOwner);
Color := clBtnFace;
Pressed := false;
Caption := '';
SetBounds (0,0,50,50);
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
test.create(form1);
end;
...
beim programmstart bekomm ich eine zugriffsverletzung!
kann mir jemand helfen? von klassen erstellen hab ich kaum ahnung!
PS: wenn ich hier falsch bin, verschiebt mich und benachrichtigt mich bitte !
danke im voraus
