Forum: Object-Pascal / Delphi-Language
by mb.99,
5. Nov 2014
Ich habe versucht dem KlickEvent des Spielbretts den Handler der Klasse Spielablauf zuzuweisen,
das scheitert aber daran das Lazarus den Parameter von DoOnKnotenPunktKlick verlangt...
TKnotenClickEvent = procedure (Sender: TKnotenPunkt) of object;
...
procedure DoOnKnotenpunktClick (Sender: TKnotenpunkt);
...
SpielBrett.FKnotenPunktKlick := DoOnKnotenpunktClick; //...
Forum: Object-Pascal / Delphi-Language
by mb.99,
23. Okt 2014
Spricht etwas dagegen im standard Click event des Spielbrett einafach
(Parent as TSpielablauf).PruefeAktion aufzurufen?
Edit: Hab grad selbst gemerkt das meine Idee Unfug ist.
Forum: Object-Pascal / Delphi-Language
by mb.99,
23. Okt 2014
Die Dekelaration und Zuweisung habe ich soweit hinbekommen, nur weiß ich nicht wie ich jetzt die Funktion 'PruefeAktion' auslösen kann.:oops:
TSpielAblauf = class
public
FOnAktion : TKnotenClickEvent;
constructor create;
private
Forum: Object-Pascal / Delphi-Language
by mb.99,
23. Okt 2014
Wahrscheinlich stell ich mich gerade blöd an aber mir leuchtet es gerade nicht so wirklich ein mit den Events
vielleicht könnt ihr mir da weiterhelfen.
KLasse Spielbrett beinhaltet ein Array of...TKnotenpunkt(TCustomControll)
Klasse Spielablauf beinhaltet ein Spielbrett und die Funktion 'Aktion'.
In der Funktion 'Aktion' wird geprüft wer am Zug ist, ob derjenige einen Stein verschieben...
Forum: Object-Pascal / Delphi-Language
by mb.99,
23. Okt 2014
Ich werde mich dann mal mit Events außeinandersetzen, vielen Dank soweit.
Forum: Object-Pascal / Delphi-Language
by mb.99,
23. Okt 2014
Hallo,
ich möchte einer übergeordneten Klasse mittels Message mitteilen das ein TCustomcontroll angeklickt wurde, nur leider reagiert die
Funktion nicht auf die Message.
Wenn ich die Funktion direkt in die Klasse des TCustomcontroll setze funktioniert es jedoch.
Woran liegt das?
Klasse des TCustomcontroll