視窗的隱藏與顯示問題

視窗的隱藏與顯示問題 Delphi / Windows SDK/API
http://www.delphi2007.net/DelphiAPI/html/delphi_20061206130101119.html
設計思路：  
  兩個程式，主程式和子程式  
  點擊主程式中一個按鈕，隱藏主程式(不在工作列中顯示)，同時運行子程式；  
  關閉子程式，顯示主程式(在工作列中顯示)。  
   
  問題是：  
  1.     Application.Minimize;  
          ShowWindow(application.Handle,SW_HIDE);  
  可以隱藏主程式，但  
    ShowWindow(findwindow(nil,pchar('aaa')),SW_restore);  
  可以顯示主程式，但工作列沒有看到主程式了，換成SW_SHOW也達不到預期的效果。  
   
  2.隱藏主程式一次還可以，第二次點擊該按鈕的時候主程式仍然看得見。  
   
  請高手幫忙解答.  
   
 

ShowWindow(findwindow(nil,pchar('aaa')),   1   );  
 

來外，最小化，要對應地   恢複   ，才能正常。

ShowWindow(findwindow(nil,pchar('aaa')),   1   );  
   
  SW_SHOWNORMAL等於1   ，問題還是一樣的，如何對應地恢複呢？

對於一個運行一個子程式隱藏主程式，當關掉子程式時再顯示主程式。  
  應該如何?呢？有沒有替代的方法？

隱藏:  
  Application.Minimize();  
  ShowWindow(application.Handle,SW_HIDE);  
   
  顯示:  
  ShowWindow(application.Handle,SW_SHOW);  
  Application.Restore();  
 

強哥整潔~~~~也解決了我的問題~~  
  http://community.csdn.net/Expert/TopicView1.asp?id=5209814  
  來這裡給你分1111111111       ^-^

顯示:  
  ShowWindow(application.Handle,SW_SHOW);  
  Application.Restore();  
   
  這個是放在子程式中的，application指的是當前程式吧，application如何替換成主視窗程式呢？  
  ShowWindow(findwindow(nil,pchar('aaa')),SW_restore);  
  這種方式？？？？