Registriert seit: 29. Mai 2002
37.621 Beiträge
Delphi 2006 Professional
|
AW: Private Variable "verweigert Zutritt"
22. Sep 2011, 01:13
Delphi-Quellcode:
type
TWuerfel = class (TObject)
private
FAugen: integer;
function GetAugen: Integer;
procedure SetAugen(Value: Integer);
public
property Augen: Integer read GetAugen write SetAugen;
procedure Werfen (TBBActual: TBitBtn);
end;
var
Form1: TForm1;
Wuerfel: array[1..3] of TWuerfel; // Warum global und nicht ein Feld der TForm Klasse??
Michael Ein Teil meines Codes würde euch verunsichern.
|