Kein Zugriff auf Elemente in Function

[Banetel.eu]

Delphi-Quellcode:

function Spielfeld (Sender: TObject; var Feld, Mann1, Mann2: integer): Integer;
begin

If Feld = 1 then begin
 LabelFeld1.Caption:=Mannschaft[Mann1].name +' vs. '+ Mannschaft[Mann2].name;
end else if Feld = 2  then begin
 LabelFeld2.Caption:=Mannschaft[Mann1].name +' vs. '+ Mannschaft[Mann2].name;
end else begin
 LabelFeld3.Caption:=Mannschaft[Mann1].name +' vs. '+ Mannschaft[Mann2].name;
end;

end;

Ok erledigt habe TForm1. vor Spielfeld vergessen

[xaromz]

Hallo,

Deine Funktion ist keine Methode von TForm1. Folglich kann sie auch nicht auf dessen Eigenschaften zugreifen. Du hast zwei Möglichkeiten:

a) Du machst auf Deiner Funktion eine Methode von TForm1.

b) Du referenzierst in Deiner Funktion die Eigenschaften mit "Form1.LabelFeld1".

Die Möglichkeit b) solltest Du aber gleich wieder vergessen. Du greifst damit nämlich auf eine globale Variable ("Form1") zu, die automatisch von der IDE erstellt wurde. Wenn Du diese umbenennst oder löschst, kracht alles zusammen. (Und wie jeder weiß: globale Variablen sind böse .)

Gruß
xaromz

[Banetel.eu]

Also so wie ich es oben beschreiben habe geht alles

Delphi-Quellcode:

function TForm1.Spielfeld (Feld, Mann1, Mann2: integer): Integer;
begin
If Feld = 1 then begin
 LabelFeld1.Caption:=Mannschaft[Mann1].name +' vs. '+ Mannschaft[Mann2].name;
end else if Feld = 2  then begin
 LabelFeld2.Caption:=Mannschaft[Mann1].name +' vs. '+ Mannschaft[Mann2].name;
end else begin
 LabelFeld3.Caption:=Mannschaft[Mann1].name +' vs. '+ Mannschaft[Mann2].name;
end;
end;