社区
Delphi
帖子详情
如何把: buff: array[1..64*1024] of PChar; 读成string ?
liaokuo
2001-08-29 09:48:25
真麻烦,
是用来查看内存的1个数组
...全文
108
7
打赏
收藏
如何把: buff: array[1..64*1024] of PChar; 读成string ?
真麻烦, 是用来查看内存的1个数组
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
7 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
liaokuo
2001-08-29
打赏
举报
回复
不行,
buff: array[0..64*1024-1] of Char
读到的是固定内容
我要读的内容每分钟都在变化:
buff: array[1..64*1024] of PChar
for a := 1 to 64 do
begin
for b := 1 to 1024 do
begin
messageshow.Lines.add(string(buff[a,b]));
end;
end;
这样读的时候老4机
liaokuo
2001-08-29
打赏
举报
回复
谢谢,我test 1下
hellion
2001-08-29
打赏
举报
回复
改一下定义:
buff: array[0..64*1024-1] of Char
就可以啦
hellion
2001-08-29
打赏
举报
回复
改一下定义:
buff: array[0..64*1024-1] of PChar
就可以啦
光明山人
2001-08-29
打赏
举报
回复
写错了,应该是:Memo1.Lines.Text := buff;
Memo1.Lines就是一个TStrings
liaokuo
2001-08-29
打赏
举报
回复
或者保存到1个Tstrings更好
光明山人
2001-08-29
打赏
举报
回复
应该用buff: array[1..64*1024] of Char吧?
StrPas( buff )即可,或者直接赋值也行: Memo1.Text := buff;
Grideh与dll 消息/接口 使用操作
PrintToFile:= GetPrivateProfileInt(TblName+'print','PrintToFile',0,
PC
har
(ini)); function TStock_frm.GetIniFileInfo(Section,Key,Default:
String
;inifleN:
String
='fxsoft.ini'):
String
; var
Buff
...
网络文本函数(三)
dwcode:
array
[1..20] of C
har
; res:
PC
har
; begin Result := False; try if Pos('http://',LowerCase(url)) = 0 then url := 'http://' + url; { Open an internet session } hSession:=InternetOpen('...
字符串转换成16进制字符串
delphi直接有函数的:procedure TForm1.Button1Click(Sender: TObject);...var
buff
:
array
[0..100] of c
har
;beginfillc
har
(
buff
,100,0);BinToHex(
pc
har
(s),
buff
,length(s)*2); //这个可以直接转end;
delphi dll调用问题
dll传递
string
实现方法 delphi中dll传递
string
的实现方法: dll项目uses第一个引用s
har
emem单元; 调用的项目uses第一个引用s
har
emem单元; 调用的单元uses第一个引用s
har
emem单元; *********************************...
CnPack开发包基础库
TRGB
Array
=
array
[0..65535] of TRGBColor; const {$IFNDEF COMPILER6_UP} sLineBreak = {$IFDEF LINUX} #10 {$ENDIF} {$IFDEF MSWINDOWS} #13#10 {$ENDIF}; {$ENDIF} Alpha = ['A'..'Z', 'a'..'z', '_']; ...
Delphi
5,386
社区成员
262,729
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章