16,748
社区成员
发帖
与我相关
我的任务
分享如何消除PChar的WARNING??还有没有可以替换PChar的函数??
如:
fs1.Write( PChar(IntToStr(Count))^, SizeOf(Int64) );
fs1.Write( PChar(IntToStr(Count))^, SizeOf(Int64) );
...全文
请发表友善的回复…
发表回复
michaelsheyong 2005-09-01
- 打赏
- 举报
在编译选项中可以设想下。warning错误就不报了，不知道你是不是这个意思！
我用pchar时候，我老是warning
我用pchar时候，我老是warning
zwjchina 2005-09-01
- 打赏
- 举报
{$WARNINGS OFF}
fs1.Write( PChar(IntToStr(Count))^, SizeOf(Int64) );
{$WARNINGS ON}
就ok了!
fs1.Write( PChar(IntToStr(Count))^, SizeOf(Int64) );
{$WARNINGS ON}
就ok了!
hexenzhou 2005-09-01
- 打赏
- 举报
改成：
fs1.Write( PChar(IntToStr(Count)), SizeOf(Int64) );
fs1.Write( PChar(IntToStr(Count)), SizeOf(Int64) );
real_name 2005-09-01
- 打赏
- 举报
本身不是错误吧，只是warning 说明可能不安全把
前面加个 try 看看
前面加个 try 看看
lovever 2005-09-01
- 打赏
- 举报
PChar(IntToStr(Count))^这样写本身是错误的么??高手可否解释一下??
