有没这样的函数>??
急啊
急啊
解决方案 »
- 怎么判断TStringGrid 某列的相同值次数为3次以上,新手,就解~~
- DSPack2.33 for D5 安装问题
- 请教大家一个问题,我的程序中有一个存储过程控件,如果我在设计期指定它对应的服务器上的存储过程名,则执行时一切正常;但是如果我没有
- 我的机子IP为192.168.1.111 可是我打上IP地址报告错误
- TOwnedCollection问题,急,在线
- 关于Com的问题,有点难
- MIDAS开发,遇到数据库字段名太长的问题,请教高手!
- Access violation at address 099D63DB in module 'dxPSCoreD7.bpl'
- 我真的不会
- 送分,如何清空paradox数据库表
- 100分,求fastreport2.3每条记录自动生成序号排列!
- [请教]解决结贴,在线等!请大家帮忙看看!
var
HFileRes:HFILE;
begin
Result:=False;
if not FileExists(fName) then
Exit;
HFileRes:=CreateFile(PChar(fName), GENERIC_READ or GENERIC_WRITE,
0, nil,OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, 0);
Result:=(HFileRes=INVALID_HANDLE_VALUE);
if not Result then
CloseHandle(HFileRes);
end;
http://www.fm201.com
的 “下载中心” 看看,希望有帮助
var
HFileRes:HFILE;
begin
Result:=False;
if not FileExists(fName) then
Exit;
HFileRes:=CreateFile(PChar(fName), GENERIC_READ or GENERIC_WRITE,
0, nil,OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, 0);
Result:=(HFileRes=INVALID_HANDLE_VALUE);
if not Result then
CloseHandle(HFileRes);
end;
好方法:-)
支持,并