Einzelnen Beitrag anzeigen

Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#8

AW: Private Variable "verweigert Zutritt"

  Alt 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.
  Mit Zitat antworten Zitat