WinAPI字符及字符串函数(11):lstrcpyn

WinAPI字符及字符串函数(11):lstrcpyn,第1张

WinAPI字符及字符串函数(11):lstrcpyn,第2张

unit Unit1
接口
使用
窗口、消息、系统工具、变体、类、图形、控件、表单、
对话框、StdCtrls
type
t form 1 = class(t form)
button 1:t button;
过程按钮1Click(发件人:to object);
end;
var
form 1:t form 1;
实现
{$R *。dfm}
过程TForm1。Button1Click(发件人:to object);
var
p:PChar;
buf: array[0..255]的Char
begin
p:= ' Delphi ';
lstrcpyn(buf,p,3+1);
show message(buf);{Del}
lstrcpyn(buf,p,-1);
show message(buf);{ Delphi }
end;
结束

位律师回复
DABAN RP主题是一个优秀的主题,极致后台体验,无插件,集成会员系统
白度搜_经验知识百科全书 » WinAPI字符及字符串函数(11):lstrcpyn

0条评论

发表评论

提供最优质的资源集合

立即查看 了解详情