M micksxb Unregistered / Unconfirmed GUEST, unregistred user! 2005-05-09 #1 我想在屏幕指定坐标处打印一个文字，传入三个参数是文字坐标x，y：integer，s：PChar打印的字符串，想知道调用什么函数完成这个功能！
M micksxb Unregistered / Unconfirmed GUEST, unregistred user! 2005-05-09 #2 我想在屏幕指定坐标处打印一个文字，传入三个参数是文字坐标x，y：integer，s：PChar打印的字符串，想知道调用什么函数完成这个功能！
踏 踏浪99 Unregistered / Unconfirmed GUEST, unregistred user! 2005-05-09 #3 Var tr : TRect; DrawStyle: DWORD; begin DrawStyle := DrawStyle or DT_WORDBREAK or DT_EDITCONTROL or DT_EXPANDTABS or DT_NOPREFIX; tr.left := x; tr.top := y; Windows.DrawText(Canvas.Handle,PChar(s),Length(s),tr,DrawStyle); end;
Var tr : TRect; DrawStyle: DWORD; begin DrawStyle := DrawStyle or DT_WORDBREAK or DT_EDITCONTROL or DT_EXPANDTABS or DT_NOPREFIX; tr.left := x; tr.top := y; Windows.DrawText(Canvas.Handle,PChar(s),Length(s),tr,DrawStyle); end;
M micksxb Unregistered / Unconfirmed GUEST, unregistred user! 2005-05-09 #4 直接写canvas.textout(x,y,s)行么？
W wjava Unregistered / Unconfirmed GUEST, unregistred user! 2005-05-09 #5 当然可以： Canvas.TextOut(2,3,'sss');
M micksxb Unregistered / Unconfirmed GUEST, unregistred user! 2005-05-09 #6 我用canvas.textout(x,y,s)行么？
M micksxb Unregistered / Unconfirmed GUEST, unregistred user! 2005-05-09 #7 我的意思是在begin,end里只写一句canvas.textout(x,y,s)行么？
W wjava Unregistered / Unconfirmed GUEST, unregistred user! 2005-05-10 #8 procedure TForm1.Button1Click(Sender: TObject); var x,y:integer; s:string; begin x:=3; y:=10; s:='I Love Delphi'; canvas.textout(x,y,s); end; 可以
procedure TForm1.Button1Click(Sender: TObject); var x,y:integer; s:string; begin x:=3; y:=10; s:='I Love Delphi'; canvas.textout(x,y,s); end; 可以
M micksxb Unregistered / Unconfirmed GUEST, unregistred user! 2005-05-10 #9 wjava,你的代码是编写一个按键，按这个键就在3，10处打印i love delphi,可是我要写一个dll函数，传入x,y参数，然后在x,y处打印一个传入的字符串阿
