ActiveSkin ScrollBar如何設定? |
答題得分者是:allenchan
|
asvmfd
一般會員 發表:46 回覆:30 積分:15 註冊:2004-11-09 發送簡訊給我 |
想設定Position的值.
Thanks
void __fastcall TForm1::Skin1ScrollTrack(TObject *Sender, ISkinObject *Source, long NewPos) { DWORD volume; WideString temp; Source->GetName(&temp); NewPos=65535; //Source-> ASkinScrollBar1->Position=33; AnsiString str = temp; if(str=="ASkinScrollBar1") Edit1->Text = 66-NewPos; else if(str=="ASkinScrollBar2") Edit1->Text = 66-NewPos; }err: 發表人 - asvmfd 於 2004/12/02 00:37:08 |
asvmfd
一般會員 發表:46 回覆:30 積分:15 註冊:2004-11-09 發送簡訊給我 |
|
Zard
尊榮會員 發表:24 回覆:396 積分:539 註冊:2003-11-26 發送簡訊給我 |
呃...我是不知道你為什麼要這麼做, 不過當Edit放上圖之後, 他就是一個Container了, 會失去原本可以可讓使用者輸入字的功能了.
//--------------------------------------------------------------------------- #include結果如下圖 |
allenchan
資深會員 發表:10 回覆:306 積分:283 註冊:2004-01-06 發送簡訊給我 |
要貼圖容易,但是要在上頭打字而不破壞背景圖就比較難了,貼圖方式如下(將 Image1 的圖貼到 Edit2):
StretchBlt(GetWindowDC(Edit2->Handle), 2, 2, Edit2->Width - 4, Edit2->Height - 4, Image1->Picture->Bitmap->Canvas->Handle, 0, 0, Image1->Width, Image1->Height, SRCCOPY);但是一打字背景圖就會被破壞了,我弄了一個很簡單的程式,可以解決這問題,程式很陽春僅供參考: http://delphi.ktop.com.tw/topic.php?TOPIC_ID=61255 發表人 - allenchan 於 2004/12/09 23:08:33 |
asvmfd
一般會員 發表:46 回覆:30 積分:15 註冊:2004-11-09 發送簡訊給我 |
|
asvmfd
一般會員 發表:46 回覆:30 積分:15 註冊:2004-11-09 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |