Print(Pictureなど)

Printメソッドはある座標に文字を出力するメソッドです(だけじゃ無いんですが)。Delphiでは TCanvas型のプロパティを持っているコンポーネントなら TCanvasの「TextOut」メソッドを使用して描画する事ができます。

■ TPaintBoxに文字を出力する例

procedure TForm1.Button3Click(Sender: TObject); begin With PaintBox1 do begin {塗りつぶし} Canvas.Brush.Color := clWhite; Canvas.FloodFill(Width div 2, Height div 2, Canvas.Pen.Color, fsBorder); {フォント指定} Canvas.Font.Name := 'ＭＳ 明朝'; Canvas.Font.Style := [fsBold, fsItalic]; Canvas.Font.Size := 20; {文字出力} Canvas.TextOut(Width div 2, Height div 2, 'Delphi'); end; end;