菜鸟求救，关于APPLICATION.TITLE |
|
答題得分者是：小傑克
|
|
zhouying82
高階會員   發表：150 回覆：272 積分：189 註冊：2004-03-16 發送簡訊給我 |
我想在APPLICATION最小化缩放在任务栏的时候，改变APPLICATION的TITLE值，在PROJECT里面弄不行。因为我有个函数。改怎么写呢？最小化到任务栏的代码如下
[code delphi] procedure TForm1.ToolButton7Click(Sender: TObject); begin Application.MainForm.Visible := False; if IsWindowVisible(Application.Handle) then ShowWindow(Application.Handle, SW_HIDE ); end; [/code]
------
断断续续的学了几年，还是一个初学者，永远支持Delphi ! |
|
老大仔
尊榮會員 發表：78 回覆：837 積分：1088 註冊：2006-07-06 發送簡訊給我 |
|
|
zhouying82
高階會員 發表：150 回覆：272 積分：189 註冊：2004-03-16 發送簡訊給我 |
|
|
老大仔
尊榮會員 發表：78 回覆：837 積分：1088 註冊：2006-07-06 發送簡訊給我 |
|
|
zhouying82
高階會員 發表：150 回覆：272 積分：189 註冊：2004-03-16 發送簡訊給我 |
|
|
老大仔
尊榮會員 發表：78 回覆：837 積分：1088 註冊：2006-07-06 發送簡訊給我 |
|
|
zhouying82
高階會員 發表：150 回覆：272 積分：189 註冊：2004-03-16 發送簡訊給我 |
|
|
老大仔
尊榮會員 發表：78 回覆：837 積分：1088 註冊：2006-07-06 發送簡訊給我 |
|
|
st33chen
尊榮會員 發表：15 回覆：591 積分：1201 註冊：2005-09-30 發送簡訊給我 |
|
|
小傑克
資深會員 發表：5 回覆：209 積分：357 註冊：2009-02-16 發送簡訊給我 |
這沒這麼複雜, 最小化最大化可以自定event ,你的需求如下
只要接管最小化event 就可以 ,關於application event 可以參考http://delphi.ktop.com.tw/board.php?cid=168&fid=913&tid=19843 [code delphi] procedure TForm1.FormCreate(Sender: TObject); begin Application.OnMinimize := myMin; end; procedure TForm1.myMin(Sender: TObject); begin ShowWindow(Application.Handle, SW_MINIMIZE); Application.Title := 'abc'; end; [/code] ===================引 用 zhouying82 文 章=================== 我想在APPLICATION最小化缩放在任务栏的时候，改变APPLICATION的TITLE值，在PROJECT里面弄不行。因为我有个函数。改怎么写呢？最小化到任务栏的代码如下 [code delphi] procedure TForm1.ToolButton7Click(Sender: TObject); begin Application.MainForm.Visible := False; if IsWindowVisible(Application.Handle) then ShowWindow(Application.Handle, SW_HIDE ); end; [/code]
------
額有朝天骨,眼中有靈光
編輯記錄
小傑克 重新編輯於 2009-04-08 15:59:40， 註解 無‧
|
|
老大仔
尊榮會員 發表：78 回覆：837 積分：1088 註冊：2006-07-06 發送簡訊給我 |
to小傑克
可是我用了以下方法時 卻失效耶.... [code delphi] Application.Title := 'abc'; if IsWindowVisible(Application.Handle) then ShowWindow(Application.Handle, SW_HIDE ); [/code] 是因為作業系統的關係嗎?(win2000) and... Application.Title := 'abc';這句語法 是不是不會影響到工作管理員裡的名稱? 因為我從工作管理員看 確實是檔名而不是title值耶 |
|
zhouying82
高階會員 發表：150 回覆：272 積分：189 註冊：2004-03-16 發送簡訊給我 |
|
|
小傑克
資深會員 發表：5 回覆：209 積分：357 註冊：2009-02-16 發送簡訊給我 |
|
|
老大仔
尊榮會員 發表：78 回覆：837 積分：1088 註冊：2006-07-06 發送簡訊給我 |
發表時間：2009-04-07 15:55:42
IP:218.80.xxx.xxx 訂閱
系統時間：2024-05-19 14:19:36
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |