OSによる画面の再描画が終わったことを知るには (ID:151988)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 TStringGrid = class(Vcl.Grids.TStringGrid) //Delphi 7 なら違う protected procedure Paint; override; end; procedure TStringGrid.Paint; begin inherited; Canvas.Pen.Color := clBlack; Canvas.MoveTo(0,0); Canvas.LineTo(100,100); end; Gird描画あとに描画なら かな