一个调用DrawText函数的问题.(100分)

  • 主题发起人 主题发起人 gangyizhu
  • 开始时间 开始时间
G

gangyizhu

Unregistered / Unconfirmed
GUEST, unregistred user!
小弟自写程序来,极少调用API,现在碰到一个问题,我想调用DrawText函数来在一个矩形区<br>范围中输出文本,但总高不定,请高手指点.<br>procedure TForm1.Button1Click(Sender: TObject);<br>begin<br>&nbsp; Drawtext(Canvas.Handle,'fsadfsdafsd',-1,RECT(0,0,10,10),DT_BOTTOM);<br>end;<br>老报错!
 
procedure TForm1.Button1Click(Sender: TObject);<br>var<br>&nbsp; RC : TRect;<br>&nbsp; P : PChar;<br>begin<br>&nbsp;RC := Rect(0,0,10,10);<br>&nbsp;P := &nbsp;'fsadfsdafsd' ;<br>&nbsp;Drawtext(Canvas.Handle,p,Length(p),RC,DT_BOTTOM);<br>end;
 
to realLearning:<br>&nbsp; 呵呵!原来如此!可这是为什么啦?我觉得加不加一个变量在中间,不是一样吗?<br>&nbsp;
 
后退
顶部