Danke für die schnellen Antworten!
Ich glaube, ich werde aber eh eher eine Klasse erstellen und diese über eine TObjectList verwalten.
Wozu hat man denn auch eine objektorientierte Sprache?
Aber hierzu nochmal der Verweis zu meiner vorigen Frage:
Muss man nun eine Variable einer Klasse createn, wenn die Klasse wie folgt aussieht:
Code:
TFormat = class(TObject)
Name: String;
FontName: String;
FontSize: Integer;
FontStyle: TFontStyle;
FontColor: TColor;
FontAlign: TAlignment;
NextFormat: String;
public
constructor Create; //?? wird das benötigt?
destructor Destroy; //?? wird das benötigt?
procedure WriteFormat(fName, fFontName: String; fFontSize: Integer;
fFontStyle: TFontstyle; fFontColor: TColor; fFontAlign: TAlignment;
fNext: String);
procedure SaveToFile(fFileName: String);
procedure LoadFromFile(fFileName: String);
end;
Oder reicht auch eine einfache Deklaration?
Code:
var
format: tformat;
begin
format.name:='test';
end;