Цитата:
|
Сообщение от Kaktuz
Нет. Я о том что если будет другой тип переменных?
Код:
var
Form1: TForm1;
var x,a1,a2,a3 : string;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
x:=Edit1.Text;
ShowMessage(a[x]);
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
a1:='1';
a2:='2';
a3:='3';
end; |
В данном случае, ответ -
никак.
После компиляции информации об именах переменных в исполняемом коде не остаётся.
Имеется похожий сервис для поиска компонент на форме по имени, см. справку по FindComponent; или для хранения и поиска строковых пар типа имя=значение используй TStringList.