调用 Winexec() 时如何使用变量作参数？(100分)

liukt · 1999-11-16

各位大仙：     我有一个比较大的数据库，想在程序中调用Winrar压缩软件来做备份。为 了能随意选择备份目标磁盘，想使用一个串变量写进命令行参数中，可程序就是 不运行，请高手指点为盼！程序如下：    Var      VarS_D:string;    begin      VarS_D:=edit1.text; //得到目标磁盘盘符      winexec('/winrar  a ' +VarS_D +':akk.rar *.db',sw_normal);    end;     编译不能通过，显示：Incompatible types:'string'and 'pchar'.     如果去掉变量VarS_D，直接写成 C:akk.rar能够运行。     是因为Pascal字符串格式吗？该如何改？

tomm · 1999-11-16

改成winexec(pchar('/winrar  a ' +VarS_D +':akk.rar *.db'),sw_normal); 就行了

小天 · 1999-11-16

这样定义一下就行了 var VarS_D:array[0..100]of char;

Dick · 1999-11-16

当然,winexec后面接的是Pchar类型,你的程序应该这么修改: ... var   Cmd : Array[1..255] of char;   begin   VarS_D := Edit1.text;   VarS_d := '/winrar  a ' +VarS_D +':akk.rar *.db';   StrPCopy(Cmd, VarS_D);   Winexec(Cmd, sw_normal); end   如果路径很长,中间包含空格等,建议写成 如下格式:   if Pos(' ', varS_D) <> 0 then     StrPCopy(Cmd, '"'+VarS_D+'"')   else StrPCopy(Cmd, VarS_D);

cAkk · 1999-11-16

附注: 既然是命令行使用rar,还不如用Dos下的rar.exe.

cytown · 1999-11-16

唉, 这种问题, 来晚了:-( pchar(string)可以转换string-->pchar strpas(pchar)可以转换pchar-->string

Schiesser · 1999-11-16

晚了。:-(

柳五公子 · 1999-11-16

又是pchar & string, @_@

liukt · 1999-11-16

多谢各位指教！ Tomm大师的答案可以正常运行！ 其它几位的答案不能运行，仍存在同样问题，请试一下。但dick大师 的 if...else 思路很好，我已写入程序中。 现在程序已经调试好了！再次向各位致谢！ 这是我见过的最棒的BBS！

调用 Winexec() 时如何使用变量作参数？(100分)

liukt

Unregistered / Unconfirmed

tomm

Unregistered / Unconfirmed

小天

Unregistered / Unconfirmed

Dick

Unregistered / Unconfirmed

cAkk

Unregistered / Unconfirmed

cytown

Unregistered / Unconfirmed

Schiesser

Unregistered / Unconfirmed

柳五公子

Unregistered / Unconfirmed

liukt

Unregistered / Unconfirmed

Similar threads