1. 怎么在关闭窗口时询问后用户如不关闭可返回窗口?
2. 如何做链接?
3. 如何做ini文件?即记录一些系统参数的,有例子吗???

解决方案 »

  1.   

    1、在Form的OnCloseQuery事件中写代码:
    if application.MessageBox('你真的要退出吗?','退出确认',mb_yesnocancel)<>idyes then
      canclose:=false;2、用一个Label写上链接的文字,然后在其OnClick事件中写如下代码:
    shellexecute(handle,'','http://www.163.com','','',sw_show);
    //注意:要在Uses列表中加上 shellapi 单元。3、请参阅:
    http://www.delphiok.com/bcjq/all/100.htm
      

  2.   

    询问后不关闭:procedure TMainForm.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
    begin
      这里询问;
      if 不关闭 then
        CanClose := False;
    end;
      

  3.   

    1,早onclosequery事件里写代码,如果不关闭就CanClose变为False;
    2,你的链接,是啥意思?网页?
    3,哪个例子很多,自己找找吧