[正确就结贴]无TApplcation并且无窗体的程序需要Handle怎么办?

我的程序没有使用TApplication，所以没有办法使用Application.Handle
但是我调用的一个API需要   handle我要怎么办？谢谢

解决方案 »

  1.   

    Var
      a : thandle;
    beign
      a := findwindow('appname',nil);
    end;
      

  2.   

    Application的本质也是个form
    你需要那个form的handle就用哪个form啊
      

  3.   

    回楼上。。我的程序也没有FORM
    是我的数据库程序的一个辅助程序
      

  4.   

    没有办法直接通过代码来得到当前应用程序的handle吗 ?
      

  5.   

    直接用 nil 或者 0 试下
      

  6.   

    你想做什么?传递消息?
    Classes.AllocWnd,呵呵可能记错,但是类似这样,分配一个Handle的
      

  7.   

    没这么做过，帮着分析一下，可能不对：
    可以显式的分配一个HWND，和线程消息处理类似。
      

  8.   

    不知道你的api是什么。如果你需要对消息进行处理，那么就有必要建一个窗口了，只有窗口才能处理消息。Classes.AllocWnd其实也是建立了一个隐藏的窗口， Timer控件就是这样做的。如果你不需要处理消息，那么试一下传个0看看，也可以用Windows.GetDesktopWindow取得桌面的handle来用。
      

  9.   

    AHA。。楼上正解啊取得桌面的HANDLE真是一个非常好的主意。。3Q
    结贴。