【Delphi】以程式碼按下 Windows 的 "開始" 鈕

送個訊息給 Windows 系統

 
procedure TForm1.Button1Click(Sender: TObject) ;
begin
    SendMessage(Form1.handle, WM_SYSCOMMAND, SC_TASKLIST,0) ;
end;