在Canvas上写字

[iamyourneed]

是由程序控制的在那写，写什么，不知道有什么方法，分不够再给

[糖醋鼻子]

canvas.textout吧，你试试看

[jinjazz]

procedure TForm1.Button1Click(Sender: TObject);
begin
Canvas.TextOut(100,100,'I Love Delphi');
end;

[iamyourneed]

已经解决了