Witam!
Miałem procedurkę:
procedure podmien(var S : array of string);
begin
S[1]:='cos';
...
end;
Czyli jej zadaniem jest modyfikowanie tablicy przekazanej jako argument. Było ok. Ale postanowiłem procedurę tę przenieść do mojej klasy i nie chcę już jej przekazywać parametru. Chcę go przekazać przez konstruktor. No i mam problem, jak ją zapamiętać, by z później odwołując się do niej odwoływać się do źródła.
Inaczej mówiąc... oto fragment programu:
var P : array[0..10] of String;
procedure Podmien(var X : array of string);
begin
X[1]:='XXX';
end;
procedure TfGlowny.Button1Click(Sender: TObject);
begin
P[1]:='Test';
Podmien(P);
ShowMessage(P[1]);
end;
Powyższy przykład działa. Ale chciałbym w procedurze Podmien zapamiętać jakoś adres do tej tablicy w innej zmiennej i tą inną zmienną się posługiwać. Próbowałem tak:
procedure Podmien(var X : array of string);
var T : array of string;
begin
T:=@X;
T[1]:='XXX';
end;
ale nie działa :( Pomoże ktoś?