[goshaua]

Здравствуйте! Как можна занести имена переменных в массив, чтоби сделать, например так:

Код:

procedure New();
const
  ArrV : array [0..1] of <type> = (GlobalVarName1, GlobalVarName2);
begin

ArrV[0] := 'FFFFFF'; 

//GlobalVarName1 = 'FFFFFF';
end;

Спассибо !

[Rokuell]

А никак. Нечто подобное можешь сделать через указатели.
для String:

Код:

var GlobalVar1,GlobalVar2:string;

procedure New();
const
  ArrV : array [0..1] of Pointer = (@GlobalVar1, @GlobalVar2);
begin
 PString(ArrV[0])^ := 'FFFFFF';
 PString(ArrV[1])^ := 'qwerty';
end;

или общий вариант:

Код:

var GlobalVar1,GlobalVar2:<type>;

procedure New();
const
  ArrV : array [0..1] of Pointer = (@GlobalVar1, @GlobalVar2);
type Mtype = ^<type>;
begin
 Mtype(ArrV[0])^ := <value>;
 Mtype(ArrV[1])^ := <value>;
end;