var buf:array[1..100] of byte
S:string;
如何将buf转换为S?
S:string;
如何将buf转换为S?
解决方案 »
- delphi中获取黏贴板内容的问题
- 关于ComboBox与数据难点
- 使用RichEdit象实现QQ那种请求视频的时候,它的提示就在RichEdit中显示出来,然后你可以点接受 或者拒绝,都进行相应的处理,比如接受
- 高分请教高手一个数据库问题
- 大侠们, 怎么在DBGird里读出图形来呀!
- Access中的SQL语句问题
- 关于ListView的操作问题
- 建议Delphi程序员读读VCL源代码,WindowAPI,顺便散点分!
- 在delphi中,如何发送键盘指令
- 在线求助:怎样将EXCEL中的数据写入到数据库中,我用的ADO。
- 关于TCanvas的一个问题
- stringgrid里字体最小能设置到多小?
buf:array[1..100] of byte;
S1:string;
s2: string;
begin
s1 := '12345';
Move(s1[1],buf[1],5);
SetLength(s2,5);
Move(buf[1],s2[1],5);
ShowMessage(s2);
buf:array[1..100] of byte;
S1:string;
s2:string;
begin
s1 := '12345';
Move(s1[1],buf[1],5);
s2 := StrPas(pchar(@buf[1]));
ShowMessage(s2);
begin
s:=s+chr(buf[i]);
end;