請問form |
|
尚未結案
|
|
20052020
初階會員  發表：121 回覆：79 積分：40 註冊：2005-01-18 發送簡訊給我 |
|
|
Stallion
版主  發表：52 回覆：1600 積分：1995 註冊：2004-09-15 發送簡訊給我 |
當然可以，請查閱SetSysColors與GetSysColor兩個WinAPI。
|
|
20052020
初階會員 發表：121 回覆：79 積分：40 註冊：2005-01-18 發送簡訊給我 |
|
|
Stallion
版主 發表：52 回覆：1600 積分：1995 註冊：2004-09-15 發送簡訊給我 |
|
|
supman
尊榮會員 發表：29 回覆：770 積分：924 註冊：2002-04-22 發送簡訊給我 |
您好：
上面的程式要改成下面這樣才正確
procedure TForm1.Button1Click(Sender: TObject);
var
OldColor,NewColor: TColor;
begin
OldColor:=COLOR_ACTIVECAPTION;
NewColor:=clRed;
SetSysColors(1, OldColor,NewColor);
end; 另外上面作法將會使整個系統的標題列全部改變，請參考下面這篇。
http://delphi.ktop.com.tw/topic.php?topic_id=56256 另外還有一篇更周密的作法。
http://delphi.ktop.com.tw/topic.php?topic_id=54730 您參考參考.. Stallion大人，我想20052020的問題是在
SetSysColors(1, COLOR_ACTIVECAPTION, clBlue);
第2,3參數是指標，不過您是用常數傳入，編譯會有問題。 發表人 - supman 於 2005/07/09 10:57:52
|
發表時間：2005-07-07 18:47:25
IP:61.59.xxx.xxx 未訂閱
系統時間：2024-11-25 2:23:38
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |