請問 Memo1 未何不會反白 ? |
|
答題得分者是：Stallion
|
|
pcboy
版主   發表：177 回覆：1838 積分：1463 註冊：2004-01-13 發送簡訊給我 |
請問下面未何不會反白:
procedure TForm1.Button1Click(Sender: TObject); begin Memo1.SelStart := 0; Memo1.SelLength := 2; Memo1.SelectAll; end;下面也不會反白: procedure TForm1.Button2Click(Sender: TObject); begin Memo1.SelectAll; end;下面也不會反白: procedure TForm1.Button2Click(Sender: TObject); begin Memo1.SelectAll; Memo1.Repaint; end;
------
能力不足，求助於人；有能力時，幫幫別人；如果您滿意答覆，請適時結案！ 子曰：問有三種，不懂則問，雖懂有疑則問，雖懂而想知更多則問！ |
|
Stallion
版主  發表：52 回覆：1600 積分：1995 註冊：2004-09-15 發送簡訊給我 |
請問有設定失去焦點時依然反白嗎？如果沒有，試試看下面作法！
procedure TForm1.Button1Click(Sender: TObject); begin Memo1.SetFocus; Memo1.SelStart := 0; Memo1.SelLength := 2; //Memo1.SelectAll; end;下面也不會反白: procedure TForm1.Button2Click(Sender: TObject); begin Memo1.SetFocus; Memo1.SelectAll; end;下面也不會反白: procedure TForm1.Button2Click(Sender: TObject); begin Memo1.SetFocus; Memo1.SelectAll; // Memo1.Repaint; end;----------------------------------------------- Creation is the fundation of promotion. |
|
supman
尊榮會員 發表：29 回覆：770 積分：924 註冊：2002-04-22 發送簡訊給我 |
|
|
pcboy
版主 發表：177 回覆：1838 積分：1463 註冊：2004-01-13 發送簡訊給我 |
發表時間：2005-06-25 13:14:45
IP:203.204.xxx.xxx 未訂閱
系統時間：2024-07-02 4:00:03
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |