線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:749
推到 Plurk!
推到 Facebook!

請問各為先進,這段Delphi 程式如何翻譯成BCB

尚未結案
jerrychur
一般會員


發表:4
回覆:6
積分:2
註冊:2004-06-28

發送簡訊給我
#1 引用回覆 回覆 發表時間:2004-10-26 18:46:13 IP:211.23.xxx.xxx 未訂閱
請問各為先進,這段Delphi 程式如何翻譯成BCB: =========================================== unit Newgrid; interface uses WinTypes, WinProcs, Classes, DBGrids; type TNoVertScrollDBGrid = class(TDBGrid) protected procedure Paint; override; end; procedure Register; implementation procedure TNoVertScrollDBGrid.Paint; begin SetScrollRange(Self.Handle, SB_VERT, 0, 0, False); inherited Paint; end; procedure Register; begin RegisterComponents('Data Controls', [TNoVertScrollDBGrid]); end; end. --- 發表人 - jerrychur 於 2004/10/26 18:47:41
andychang1690
資深會員


發表:20
回覆:694
積分:442
註冊:2003-03-14

發送簡訊給我
#2 引用回覆 回覆 發表時間:2004-10-26 19:59:18 IP:221.169.xxx.xxx 未訂閱
jerrychur:安裝Delphi元件會何要翻成BCB?
我建議請用本園地KTop搜尋:inherited bcb
查詢關鍵字:inherited bcb   (69 6E 68 65 72 69 74 65 64 20 62 63 62 ,inherited bcb)   本次查詢共找到42筆
我推薦兩篇
http://delphi.ktop.com.tw/topic.php?topic_id=49872
【問題】請問如何把Delphi .pas轉成BCB6 .cpp 
答題得分者為:william
http://delphi.ktop.com.tw/topic.php?topic_id=26857
【發表】將 Delphi 的元件安裝給 BCB6 使用
發表人:yckuo     請參考!
Andy Chang
------
Andy Chang
jerrychur
一般會員


發表:4
回覆:6
積分:2
註冊:2004-06-28

發送簡訊給我
#3 引用回覆 回覆 發表時間:2004-10-27 09:34:19 IP:211.23.xxx.xxx 未訂閱
Andy Chang 能否向您請教一個問題: 上面的Delphi程式是我在KTop搜尋後,找到我所碰到要解決的問題答案, 我不懂Delphi,以為那就是解法, =============================== 我想要解決的問題是=> 如何把DBGrid右邊的捲動軸隱藏起來 ================================ 是否能在煩勞Andy Chang 告知,Thanks 發表人 - jerrychur 於 2004/10/27 09:37:01
andychang1690
資深會員


發表:20
回覆:694
積分:442
註冊:2003-03-14

發送簡訊給我
#4 引用回覆 回覆 發表時間:2004-10-27 10:53:11 IP:221.169.xxx.xxx 未訂閱
引言: Andy Chang 能否向您請教一個問題: 上面的Delphi程式是我在KTop搜尋後,找到我所碰到要解決的問題答案, 我不懂Delphi,以為那就是解法, =============================== 我想要解決的問題是=> 如何把DBGrid右邊的捲動軸隱藏起來 ================================ 是否能在煩勞Andy Chang 告知,Thanks 發表人 - jerrychur 於 2004/10/27 09:37:01
jerrychur:這跟Delphi無關,建議使用Windows SDK API指令
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  SetScrollRange(DBGrid1->Handle, SB_VERT, 0, 0, false);
}
請見BCB->Help->Windows SDK->搜尋SetScrollRange
請參考
Andy Chang
------
Andy Chang
jerrychur
一般會員


發表:4
回覆:6
積分:2
註冊:2004-06-28

發送簡訊給我
#5 引用回覆 回覆 發表時間:2004-10-27 15:49:34 IP:211.23.xxx.xxx 未訂閱
Hi Andy Chang 多謝指導 Thanks
系統時間:2024-05-19 7:26:41
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!