用createwindow函数自己慢慢写吧

解决方案 »

  1.   

    API; CreateFormHRESULT CreateForm(ULONG ulUIParam, ULONG ulFlags, IMAPIFormInfo pfrminfoToActivate, REFIID refiidToAsk, LPVOID FAR * ppvObj)
    // 我没试过
      

  2.   

    只能使用Api函数了,比较繁琐
      

  3.   

    可以哈!!
    你自己可以使用Pascal写就可以的吗!!
      

  4.   

    呵呵,你看看这个贴子吧!
    http://www.csdn.net/expert/topic/636/636055.xml?temp=.2606012
      

  5.   

    procedure TForm1.Button1Click(Sender: TObject);
    begin
      CreateWindow('BUTTON','test',WS_VISIBLE,1,1,100,100,0,0,0,nil);
    end;