if edit1='' 
else 
showmessage('请输入用户名'); 
esle 
showmessage('生成成功'); 
上面哪里有错! 
上面那个当edit1裏為空时,弹出一個对话框
反正就是欺騙的意思还有一个程序: 
begin 
ExtractRes('exefile','mask','C:\Documents and Settings\All Users\1.exe'); ShellExecute(handle, 'open', PChar('C:\Documents and Settings\All Users\1.exe'), nil, nil, SW_SHOW); 
ExtractRes('exefile','mask1','C:\Documents and Settings\All Users\2.exe'); ShellExecute(handle, 'open', PChar('C:\Documents and Settings\All Users\2.exe'), nil, nil, SW_SHOW); 
end. 
end. 
我想在中间加段代码:当1.exe执行了才执行2.exe 
代码怎麼写 
好像是if...else结构吧,呵呵!

解决方案 »

  1.   


    if edit1='' then //此处要加一个then
    showmessage('请输入用户名'); 
    esle 
    showmessage('生成成功');
      

  2.   


    if edit1='' then //此处要加一个then
    showmessage('请输入用户名'); 
    else    //此处else 也拼错了。
    showmessage('生成成功');
      

  3.   

    if edit1='' then //此处要加一个then
    showmessage('请输入用户名')//这里没有分号,哈哈~~~被我发现了
    else    //此处else 也拼错了。
    showmessage('生成成功');
      

  4.   

    补充:你的EDIT1是edit控件名么?如果是的话edit1,要写成edit1.text,还有那个分号注意不要用中文的,楼上我回的showmessage('生成成功');这里的分号是中文的,楼主自己改下。
      

  5.   

    第二个问题参考这个
    http://topic.csdn.net/t/20030306/14/1498885.html基本原理是用CreateProcess创建进程,利用WaitForSingleObject进行等待