全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:1862
推到 Plurk!
推到 Facebook!

[推薦]如何使用OnIdle事件

 
axsoft
版主


發表:681
回覆:1056
積分:969
註冊:2002-03-13

發送簡訊給我
#1 引用回覆 回覆 發表時間:2002-08-06 10:27:25 IP:61.218.xxx.xxx 未訂閱
使用OnIdle事件隨時監視剪貼板內容以改變彈出選單的可執行項。    資料來源:http://51hoo.51.net/bcb/bcb2002.htm    在Form1的.h的private加上:
    void __fastcall OnIdle(Tobject* Sender,bool& Done);        在Form1的.cpp內加上:    void __fastcall TForm1::OnIdle(Tobject* Sender,bool& Done)    {     bool TextSelected=DBRichEdit1->SelLength>0;     N17->Enabled=TextSelected;//剪切,複制,清除     N18->Enabled=TextSelected;     N20->Enabled=TextSelected;     bool CBHasText=Clipboard()->HasFormat(CF_TEXT);// 需加入#include     N19->Enabled=CBHasText;//貼上     bool HasText=RichEdit1->Lines->Count>0;     N21->Enabled=HasText;//全選     bool HasChanged=RichEdit1->Modified;     ToolButton2->Enabled=HasChanged;     ToolButton4->Enabled=HasChanged;    }
在Form1的OnCreate內加上:
    Application->OnIdle=OnIdle; 
時間就是金錢---[ 發問前請先找找舊文章] 發表人 - axsoft 於 2002/08/06 10:28:45
系統時間:2024-04-27 7:22:07
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!