tcanvas

6熱

3答えて

私は、TEDITにTEDITは直接Canvas性質を持っているので、残念ながら、これはコンパイルされません Edit1.Text := MinimizeName(FileName, Edit1.Canvas, Edit1.Width); のようなものを合わせて、ファイル名を短くしたいです。キャンバスはそのフォントメトリックに必要です。 TEditのキャンバスにはどのようにアクセスできますか？

3熱

2答えて

TBitmapの周囲に点線の境界線を描く？

私はビットマップに点線の境界線を追加する必要がありルーチン書かれています： procedure AddDottedBorderToBitmap(aBM: Vcl.Graphics.TBitmap); var c: TCanvas; begin c := aBM.Canvas; c.Pen.Color := clBlack; c.Pen.Mode := p

3熱

1答えて

TBitmapのは

次のコードを検討してください非関連のグラフィックスコードの後にクリッピングリージョンを失い：私はFBitmapのクリッピング領域が維持され、その後設定されているキャプションずにForm1のタグを設定した場合、DrawBorderで type TBaseControl = class(TWinControl) private FBitmap : TBitmap;

2熱

1答えて

FMX TCanvasでフォントの色を設定

ここで何かが見つからないのかどうかわかりませんが、Firemonkey TCanvasでフォントの色を設定できますか？私は、次のプロパティでこれを示唆して何も表示されません。 Canvas.Font. ???? すべてのヘルプはおかげで、