Delphi中是否可以把字符串变量中的字符转换成一个变量名

Question

如：
   var 
     str1,str2:string;
   begin
     str1:='test';
     str2:='str1';
     //用什么方法使str2中的内容'str1'转换成以知道变量str1;
     //即怎样通过上式使str2=str1='test';   
     showmessage(str2);//要求显示'test';
   
   end;
      

Answer 1

用个笨方法: Case吧.有时候笨办法总比没办法好啊.......

Answer 2

不能用 CASE 因为内容不可预知的。

Answer 3

你以为是VB或是VFP？
Delphi恐怕不行。

Answer 4

摩托有一办法：
把str1封装成Tcomponent，用findcomponent方法

Answer 5

一个取地址，一个取内容  s1 := '1234';
  s2 := Pchar(s1) ;
  Label1.Caption := s2;可以吗？

Answer 6

其实你可以自己完成一个类的封装，做到和你要求相仿说白了你的目的是能够用一个字符串去索引另外一个字符串，也就是str2:=××××['str1'];这不难吧研究一下：Tstringlist.addobject  ：）