FMX的TStringGrid可否在執行時,動態改變指定Column的字體大小呢? |
缺席
|
riekie
一般會員 發表:7 回覆:5 積分:2 註冊:2002-10-11 發送簡訊給我 |
版上的各位前輩好,小弟目前剛接觸FireMonkey,之前都是用VCL元件開發,在VCL的TStringGrid可以透過onDrawCell針對某個Column進行改變顏色或字體,而在FMX的TStringGrid雖然也可以透過OnDrawColumnCell進行指定,但是原本顯示的文字依然還是在上面不會消失,變成文字重疊的狀況,不知是小弟哪個程序有誤,或者不能夠透過此方式來進行重新繪製文字呢??
我的程式碼如下: procedure TForm2.StringGrid1DrawColumnCell(Sender: TObject; const Canvas: TCanvas; const Column: TColumn; const Bounds: TRectF; const Row: Integer; const Value: TValue; const State: TGridDrawStates); begin if Row mod 2 = 0 then begin Canvas.Fill.Color := TAlphaColorRec.Red ; Canvas.Font.Size := 16 ; Canvas.FillText(Bounds,Value.AsString,true,1,[],TTextAlign.Leading,TTextAlign.Center); end; end; 顯示重疊的結果(附件) 還請版上前輩們不吝指導一下,感激不盡,謝謝。 |
riekie
一般會員 發表:7 回覆:5 積分:2 註冊:2002-10-11 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |