請問如何控制StringGrid的光棒... |
|
答題得分者是：william
|
|
kelon
一般會員   發表：17 回覆：27 積分：18 註冊：2002-07-22 發送簡訊給我 |
|
|
william
版主   發表：66 回覆：2535 積分：3048 註冊：2002-07-11 發送簡訊給我 |
|
|
kelon
一般會員 發表：17 回覆：27 積分：18 註冊：2002-07-22 發送簡訊給我 |
抱歉~~問得太快...
目前光棒位置可以在OnSelectCell()裡記錄
現在想請問一下...
我因為想讓每格的文字靠右 而引用了找來的一段程式碼..
在OnDrawCell()裡... const AnsiString& CellStr( StringGrid->Cells[ACol][ARow] );
TCanvas* const Canvas( StringGrid->Canvas );
Canvas->Font->Size = 12;
Canvas->Font->Name = "細明體";
if ( State.Contains( gdFixed ) )
{
Canvas->Brush->Color = StringGrid->FixedColor;
Canvas->FillRect( Rect );
Frame3D( Canvas, Rect, clBtnHighlight, clBtnShadow, 1 );
}
else
{
if ( State.Contains( gdSelected ) && State.Contains( gdFocused ) )
{
Canvas->Brush->Color = clHighlight;
Canvas->Font->Color = clHighlightText;
}
Canvas->FillRect( Rect );
}
UINT Attrib( DT_SINGLELINE | DT_VCENTER );
Attrib |= DT_RIGHT;
DrawText( StringGrid->Canvas->Handle, CellStr.c_str(),
CellStr.Length(), &Rect, Attrib );
if ( State.Contains( gdFocused ) )
Canvas->DrawFocusRect( Rect ); 可是現在我每次上下移動 光棒都只出現在一個Cell內
要怎樣有一整行的光棒呢???
|
|
kelon
一般會員 發表：17 回覆：27 積分：18 註冊：2002-07-22 發送簡訊給我 |
發表時間：2002-11-28 10:53:11
IP:211.20.xxx.xxx 未訂閱
系統時間：2024-04-17 4:35:36
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |