各位大大 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=25686 我上次問了一個問題，如何瞬間將所有視窗最小化，已經可以用了，但是，現在 有另外一個問題，能不能將所有被最小化的視窗，瞬間回復原來的樣子? 因為一 個一個用滑鼠去按回來滿麻煩的

引言: 各位大大 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=25686 我上次問了一個問題，如何瞬間將所有視窗最小化，已經可以用了，但是，現在 有另外一個問題，能不能將所有被最小化的視窗，瞬間回復原來的樣子? 因為一 個一個用滑鼠去按回來滿麻煩的 < face="Verdana, Arial, Helvetica"> SophiaLin83 你好: 請參考以下的做法 < class="code"> void __fastcall TForm1::btnUndoMinimizeALLClick(TObject *Sender) { Variant ShellOLE; CoInitialize(NULL); ShellOLE=Variant::CreateObject("Shell.Application"); Function UndoMinimizeALL("UndoMinimizeALL"); ShellOLE.Exec(UndoMinimizeALL); ShellOLE=Unassigned; } -- Enjoy Researching & Developing --

太好了，謝謝版主