大哥们:
   我在主窗体上加了一个按钮,点击他就调用word打开一个word文件
  但这时主窗体还在前面,我怎样把这个主窗体最小化?

解决方案 »

  1.   

    procedure TForm1.Button1Click(Sender: TObject);
    begin
      ... // 打开word文件
      Application.Minimize;  // 最小化
    end;
      

  2.   


      Application.Minimize;  在按钮按下去后,,使application最小化,,就可以了,,祝:身体健康,答案和分数同样重要!!!
      

  3.   

    大哥:
      我的想法是主窗体不让他占有焦点
      把焦点交给哪个打开的word文档?
      怎么写?
    回答对了,立刻给分!
      

  4.   

    大哥:
     我是想把主程序窗体放在word文档的背后
     把焦点交给word文档!
      

  5.   

    如果你是用OLE方式打开,要先open再设visible:
    var myWord: Variant;
    begin
      myWord := CreateOleObject('Word.Application');
      myWord.Documents.Open('d:\test.doc');
      myWord.Visible := True;
    end;如果你是用Shellexecute打开,本来就会把焦点转到Word上:
    ShellExecute(0, 'open', 'd:\test.doc', nil, nil, SW_SHOWNORMAL);