Objekt direkt einen Wert zuweisen?

[youuu]

Hi wie kann ich einen Objekt direkt einen Wert zuweisen?

Delphi-Quellcode:

 TCompanySize = class
  Private
     Small: string;   << wert zuweisen
     Middle: string;
     Large: string;
  Public
   Procedure CompanySizeAdd(Customer: TObject; Size: string);
  End;

[mkinzler]

Meinst du einen Default-Wert oder eine Property?

[youuu]

einen default wert

[mkinzler]

Du könntest ihn z.B. im Konstruktor setzen.

[Muetze1]

Dafür gibt es den Constructor.

Ausser der Wert soll sich dann nie wieder ändern, dafür gibs dann auch was von ratiopharm: Konstanten.

[youuu]

Danke hat geklappt

[SimStar001]

Lies dir doch mal bitte das Tutorial zu OOP und so an ---> such mal nach Delphi CrashKurs... das ist super, und damit werden alle deine Fragen geklärt, denn es kommt mir so vor, als ob du nicht wirklcih über OOP bescheid weißt?

LG Marco

[quendolineDD]

Jap, so wie das aussieht könntest du das ganze anstatt der Konstanten als Enum deklarieren.
Also ca. so
TCompanySize = (csSmall, csMiddle, csLarge);