Hallo
Erstmal Vielen Dank. Ich habe jetzt noch ein bisschen rumprobiert und mir folgedes überlegt.
Delphi-Quellcode:
unit Unit2;
interface
type
TArray =
array [1..10]
of string;
TTest =
class
private
public
class procedure Add(ID: integer; text:
string);
class function Read(ID: integer):
string;
end;
var
MeinArray: TArray;
implementation
class procedure TTest.Add(ID: integer; text:
string);
begin
MeinArray[ID]:= text;
// An dieser Stelle könnte dann ja auch sowas stehen wie
// MeinArray[ID].Create('Test') ... Wenn das Array von einem von mir wiederrum
// selbst erstellten Typ z. B. TTest ist mit constructor
end;
class function TTest.
Read(ID: integer):
string;
begin
result:= MeinArray[ID];
end;
end.
Ich habe mir dadurch ale eine Klasse geschaffen, ähnlich wie die TObjectList, die meine Elemente aufnimmt. Ich habe dort jetzt auch eine globale Variable, aber damit könnte ich erstmal leben. Allerdings stellt sich dann die Frage ob ich dort folgendes:
Delphi-Quellcode:
{$WRITEABLECONST ON}
var
MeinArray: TArray;
{$WRITEABLECONST OFF}
von NicoDE benutzen kann?
Oder hat mein obiger Code überhaut irgendeinen Nachteil?
Vielen Dank?