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

stringgrid這個控件怎麽樣使比如第一行的標題可以換行顯示?

答題得分者是:deity
gxxc2008
一般會員


發表:4
回覆:4
積分:1
註冊:2008-06-13

發送簡訊給我
#1 引用回覆 回覆 發表時間:2008-07-01 15:25:33 IP:58.82.xxx.xxx 訂閱
stringgrid這個控件怎麽樣使比如第一行的標題可以換行顯示,
一個字一行的這種?
请多多指教。
deity
尊榮會員


發表:90
回覆:876
積分:678
註冊:2003-05-09

發送簡訊給我
#2 引用回覆 回覆 發表時間:2008-07-01 22:01:26 IP:121.10.xxx.xxx 未訂閱
gxxc2008您好:
procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
Rect: TRect; State: TGridDrawState);
begin
with StringGrid1 do
with Canvas do begin
FillRect(Rect);
DrawText(Handle, PChar(Cells[ACol, ARow]), Length(Cells[ACol, ARow]),
Rect, DT_VCENTER DT_CENTER DT_WORDBREAK);
end;
end;


procedure TForm1.FormCreate(Sender: TObject);
begin
StringGrid1.RowHeights[0]:=30;
StringGrid1.Cells[1,0]:='序'#13'号'; // 换行处加上#13
end;


是不是您想要的效果,试试看:)

===================引 用 gxxc2008 文 章===================
stringgrid這個控件怎麽樣使比如第一行的標題可以換行顯示,
一個字一行的這種?
请多多指教。
系統時間:2024-04-20 8:25:11
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!