救命啊，有高分！！！

Question

procedure TForm1.Image8Click(Sender: TObject);
var
i:Tinifile;
di:string;
begin
image7.show;
image8.Hide ;
di:=i.ReadString('ServerName1', 'web', '没有地址') ;
ShellExecute(Handle, 'open', PChar(?????), nil, nil, SW_SHOW);//打开一个网址
是从ini里读一个网址，已经把他带给di这个变量，现在想把di带给？？？？请问怎么做？
谢谢了

Answer 1

procedure   TForm1.Image8Click(Sender:   TObject); 
var 
i:Tinifile; 
di:string; 
begin 
image7.show; 
image8.Hide   ; 
di:=i.ReadString('ServerName1',   'web',   '没有地址')   ; 
ShellExecute(Handle,   'open',   PChar(di),   nil,   nil,   SW_SHOW);//打开一个网址 

Answer 2

这样是可以编译，但运行的时候会出错的！
高手看看吧。那个di是string的，是不是要转换？

Answer 3

这样是可以编译，但运行的时候会出错的！高手看看吧。那个di是string的，是不是要转换？

Answer 4

ShellExecute(Handle,       'open',   pchar('iexplorer')    PChar(di),        nil,       SW_SHOW);//打开一个网址  

Answer 5

大家看看楼主的分数还有他给的分。。专家分: 目前总共有26分 马上查看他的帖子
VC/MFC:20分 扩充话题:6分