Delphi7问题?(50分)

  • 主题发起人 主题发起人 wangwei200208
  • 开始时间 开始时间
W

wangwei200208

Unregistered / Unconfirmed
GUEST, unregistred user!
在程序中使用了Pchar后,编译程序回报Unsafe code'Pchar'警告错误?
请问有人遇到这个问题吗?如何解决这个问题!!
 
应该没有问题,比如
procedure TForm1.Button1Click(Sender: TObject);
var
a:shortstring;
begin
a:=Pchar('daadfd');
edit1.Text:=a;
end;
 
Pchar()括号里面要加入string变量!!!
 
是不是在D7中 用PChar需要包含什么单元文件
 
type
TWMMouseWheel = record
Msg: Cardinal;
Keys: Word;
Delta: Word;
case Integer of
0: (
XPos: Smallint;
YPos: Smallint);
1: (
Pos: TSmallPoint;
Result: Longint);
end;
大家请看上面的代码,有错误吗?在delphi7下也报那个警告错误!!
 
我用的是delphi7,上面一段关于消息类型的声名没有问题,可以编译通过,还有Pchar不需要包含
什么单元。
 
这是为了与下一版本做准备用的
你可以在工程选项中的Compiler Messages的最后几项Unsafe type XXX 去掉就行了
而且编译速度也会快很多。
 
不会有其他的影响吧?
 
to wangwei 200208
这个问题好像D7是存在的.例如我在D5下的一个程序都是好好的..可是放到D7下去编译也发出了
许多怪样的信息..更有意思的是..我在D7里的同一个单元里,用perform()函数.例如在某控
件的onkeydown事件里用时是正常的..可是当我这个单元里自定义一个过程并在里面用这个
函数时.D7硬是说没有定义这个函数.找不到...
也许是我用的盗版的原因吧!!!!!!!!!!!!!!!!!!!!!!!!!
要不你试试用正版的(严重灌水.....哈哈哈)..........到时告诉我还会不会有这样的问题......
 
这是为了和.net兼容,你可以关了它.没有关系
project/options/complier messages
 
接受答案了.
 
后退
顶部