Question

我用delphi7的ShellAPI函数做了个打开指定程序,如何在edit中输入数字就可以打开多少个呢?我是菜鸟

Answer 1

for i:=1 to strtoint(edit1.text) do
begin
//把代码复制到这个里面,就你输入多少个就打开多少个.
end;

Answer 2

这样!
我不是用Dephi的但是我提供思路(尽量按Delphi语法写0
var i:Integer;
var j:integer;
i := chartoint(edit1.text);
for j := 0; j < i; j:=j+1
begin
ShellAPI
end