您的位置:首页 > 其它

将字符串中的字符依次写入数组_TextOut

2012-05-26 08:14 162 查看
功能说明:将字符串中的字符依次写入数组

procedureTForm1.Button1Click(Sender: TObject);
var
str:string;
a:array[0..79]ofchar;
begin
str:='字符串转换测试';
strPcopy(a,str);
canvas.TextOut(10,10,string(a));
end;


通过 Wiz 发布
内容来自用户分享和网络整理,不保证内容的准确性,如有侵权内容,可联系管理员处理 点击这里给我发消息
标签: 
相关文章推荐