建议用sniffer看cuteftp等软件
解决方案 »
- 2个多边形,其中一个包围另一个,如何将中间的环带区域涂成红色?
- 如何避免SQL SERVER中字段相加 出现 10+NULL=NULL这种情况呢而使10+NULL=10
- 多个EDIT的计算??(不和数据库相连)
- TdbEdit连接的是一个时间类型的字段,当输入的字符不合法时,程序就会瘫痪
- Delphi7 for .NET Preview(CD2)那东东我上传到playICO
- 刚才的问题,继续, 解决后一起给分
- 请教:NMUDP编程
- 请问什么叫预存储过程?如何使用?
- 怎样往.exe文件里加入一段程序?
- 如何屏蔽系统的错误提示?用TRY EXCEPT好象不行
- 介绍不错的一个Delphi站点 http://www.wolfsoft.nugoo.com/ 站名:黄昏狼制作室
- 小问题:如何在程序中调用*.chm文件?
检查VCL的全域变量win32platform,win32majorversion,win32minorversin即可,
For example:
function iswindows98:boolean;
begin
result:=(win32platform=VER_PLATFORM_WIN32_WINDOWS) and
((win32majorversion>4) or
((win32majorversion=4)and(win32minorversion>=10)));
附:
WINDOWS98的WIN32MAJORVERSION为4.10以上
WIN NT的WIN32PLATFORM为VER_PLATFORM_WIN32_NT
WINDOWS 2000的WIN32MAJORVERSION为5