SetWindowLong在delphi2009下不起作用! |
答題得分者是:pceyes
|
bodelphi
一般會員 發表:5 回覆:4 積分:1 註冊:2008-09-29 發送簡訊給我 |
|
pceyes
尊榮會員 發表:70 回覆:657 積分:1140 註冊:2003-03-13 發送簡訊給我 |
step1
project.dpr [code delphi] program Project1; uses Forms, Unit1 in 'Unit1.pas' {Form1}; {$R *.res} begin Application.Initialize; Application.MainFormOnTaskBar := False; // 重點一 Application.CreateForm(TForm1, Form1); Application.Run; end. [/code] step2 unit1.pas [code delphi] procedure TForm1.FormShow(Sender: TObject); begin ShowWindow(Application.Handle, SW_HIDE); end; [/code] 參考資料 http://delphi.about.com/od/delphitips2008/qt/hide_taskbutton.htm
------
努力會更接近成功 |
bodelphi
一般會員 發表:5 回覆:4 積分:1 註冊:2008-09-29 發送簡訊給我 |
谢谢二楼的,你的方法是正解!!
我也发现一种方法也可以: program Project1; uses Forms, windows, Unit1 in 'Unit1.pas' {Form1}; {$R *.res} begin Application.Initialize; Application.MainFormOnTaskbar := false; Application.CreateForm(TForm1, Form1); SetWindowLong(application.Handle,GWL_EXSTYLE,WS_EX_TOOLWINDOW); Application.Run; end.
編輯記錄
bodelphi 重新編輯於 2009-01-05 14:34:19, 註解 無‧
|
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |