DELPHI7已经考虑到了移植到点NET的问题,在点NET里,指针是不安全的.至于为什么有的人遇到,有的人没有遇到,那是因为各人的编译选项不同.在Project菜单下选Options“Compiler Messages”,最下面三个选项就是了...........如果程序不移植到点NET,那么把这三个选项的勾取了(默认也是取了的).…
delphi7中加入了对.net的支持 在.net中是没有指针的(托管环境中),所以指针都是不安全的,不符合.net规范 所以d7里有警告,可以不管它 DELPHI7已经考虑到了移植到点NET的问题,至于为什么有的人遇到,有的人没有遇到,那是因为各人的编译选项不同.在Project菜单下选Options“Compiler Messages”,最下面三个选项就是了...........如果程序不移植到点NET,那么把这三个选项的勾取了(默认也是取了的).…
有时在Delphi使用指针类型的数据,总是提示如下: [Warning] FGroupFeedBack.pas(796): Unsafe typecast of 'Pointer' to 'TObject' [Warning] FGroupFeedBack.pas(696): Unsafe type 'PChar' 比较烦,虽说不是bug,但是看着不爽.做程序最好做到没有waring和hints. 说说怎么关闭这个waring, 其他的waring需要找出代码的不完善行,后改善,但这种warin…
今天在C代码中使用gets()时提示“warning: this program uses gets(), which is unsafe.”,然后这个程序还能运行,无聊的我开始查阅资料,为啥gets()会unsafe呢. 通过Google查阅前辈的问答,原来是这么回事. gets()这个函数只有一个参数,那就是字符缓冲区的指针,并没有指定该缓冲区的长度也就是大小.当你输入一个很长很长的字符串的时候,gets ()函数会把每一个字符都存入到栈(statck)中,因此当字符串很大的时候就会导致程序…
delphi 10.1 berlin datasnap提交clientdataset.delta报:invalid variant type conversion(类型转换错误)问题的解决,需要打这个补丁:30530_hotfix_for_datasnap 打了补丁以后,经测试,问题解决. DataSnapServer240.bpl这个包一定要覆盖.…
在win10创建新的磁盘分区的时候,有时候会提示 磁盘包含不是"PARTITION_BASIC_DATA_GUID"类型的分区 如果你试了其他方法都不凑效,那么看看你已经有几个盘(disk)了? 在一个MBR上最多只有四个盘,现在的笔记本预装的时候都喜欢搞很多隐藏的盘,什么dev.recovery之类的.删掉一个隐藏的盘,就可以创建新的盘了. win 10的这个提示太不准确,很有误导性. ps:这是从一个英文网站上看到的做法.在我这边凑效了.…
参考:http://blog.itpub.net/8432156/viewspace-924843/ 更为详细的内容请参见:http://blog.csdn.net/akof1314/article/details/6256952 以下是四种方法的简介,要想去准确的使用,请参考Delphi的帮助手册,里面准确的提到了怎么调用.有什么函数.会会出现什么效果 在Delphi中,提供模式化对话框的方法很多,现对几种比较常用的方法做如下比较: 1) 直接调用Windows API 函数MessageBo…
问题现象:在编译工程是,提示缺少DELPHI自己的很多单元. 问题原因:这可能是因为手动误删除,或是第三方控件安装时误删除DELPHI自己的目录引起的(如果说错了,希望高人指点). 问题处理: 方法一:找你同事,或是同学,看一下他的环境中都引入了什么目录,你增加一下就OK了. 方法二:复制我文章中的目录,增加一下(当然你得先换成相对目录).目录如下: D:\delphi\Borland\Delphi7\Lib;D:\delphi\Borland\Delphi7\Bin;D:\delphi\Bor…
假如操作系统的日期格式不是yyyy-MM-dd格式,而是用strtodate('2014-10-01')) 来转换的话,程序会提示爆粗 '****-**-**'is not a valid date and time 解决方法: 只需要在程序启动时添加以下代码,就可以不用修改系统日期和时间格式,就能解决上述报错 DateSeparator := '-';//日期分隔符 LongDateFormat := 'yyyy-MM-dd'; //长日期格式 ShortDateFormat := 'yyyy…
procedure TForm1.FormCreate(Sender: TObject); begin  Application.HintPause:=0;//立即显示  Application.hinthidepause:=100000;//if not leave then 显示100秒end; 来自为知笔记(Wiz)…