上次问题基本得到解决,最后发帖
再问一句,就结贴:label2.caption:=inttostr(GetDesktopWindow);显示为0。肯定不对,问题在哪里?
高人aqtata,答复:没碰到过,用GetLastError看看是否有错误。
贴已结。再请教:
GetLastError如何用?
 

解决方案 »

  1.   

    按住Ctrl键,鼠标单击GetDesktopWIndow,看看是不是Windows.pas单元的那个GetDesktopWIndow。
      

  2.   

    如果不是就改成这样:
    label2.caption:=inttostr(Windows.GetDesktopWindow);
      

  3.   

    定义一个错误信息的捕捉过程:
    procedure Tf_menu.AppException(Sender: TObject; E: Exception);
    var  p_cwdh:integer;      //错误代号
         p_cwxx:string;       //错误信息
    begin
      p_cwdh:=Getlasterror;
      p_cwxx:=e.Message ;
      application.MessageBox(p_cwxx,'提示',mb_ok+mb_iconinformation);
    end;