如何得到TEdit裡頭,游標所處位置的值? |
答題得分者是:RaynorPao
|
rockmax
一般會員 發表:24 回覆:12 積分:7 註冊:2003-02-20 發送簡訊給我 |
|
RaynorPao
版主 發表:139 回覆:3622 積分:7025 註冊:2002-08-12 發送簡訊給我 |
引言: 我現在的TEdit裡頭,有數字9999.9,利用setfocus()及SelStart的配合,我可以使TEdit裡頭的游標,搭配兩個Button元件,使游標於這些數字間左右移動,請問,現在我的游標若在第二個9的位置後面,我現在想再利用兩個TButton,使游標前的數字,能做0~9的變動,可否告訴要怎麼辦? 我是覺得,還差兩個指令,我覺得就應該可以了吧!有人可以告訴我們,謝謝。rockmax 你好: 請問?? 你所說的功能,是像以下這個樣子嗎?? < class="code"> void __fastcall TForm1::Button1Click(TObject *Sender) { int i=Edit1->SelStart; if(Edit1->SelStart>0 && Edit1->Text[Edit1->SelStart]!='.') { int j=StrToInt(Edit1->Text.SubString(Edit1->SelStart, 1)); j ; if(j>9) j=9; Edit1->Text=Edit1->Text.SubString(1, i-1) IntToStr(j) Edit1->Text.SubString(Edit1->SelStart 1, Edit1->Text.Length()-Edit1->SelStart); } Edit1->SetFocus(); Edit1->SelStart=i; } void __fastcall TForm1::Button2Click(TObject *Sender) { int i=Edit1->SelStart; if(Edit1->SelStart>0 && Edit1->Text[Edit1->SelStart]!='.') { int j=StrToInt(Edit1->Text.SubString(Edit1->SelStart, 1)); j--; if(j<0) j=0; Edit1->Text=Edit1->Text.SubString(1, i-1) IntToStr(j) Edit1->Text.SubString(Edit1->SelStart 1, Edit1->Text.Length()-Edit1->SelStart); } Edit1->SetFocus(); Edit1->SelStart=i; } -- Enjoy Researching & Developing --
------
-- 若您已經得到滿意的答覆,請適時結案!! -- -- 欲知前世因,今生受者是;欲知來世果,今生做者是 -- -- 一切有為法,如夢幻泡影,如露亦如電,應作如是觀 -- |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |