r t
解决方案 »
- 请教,delphi7web控件的事件中没有OnNewWindow3
- 哪位高手用过ExpressPrinting System Suite?
- 请问要在程序中实现监视,录象,截图功能该怎样做呢?用什么控件最好?
- 一个多文档问题————在线等待!!!!
- 动态创建Form
- ini文件使用的困惑!
- 谁知道如何在treeview的某个节点被编辑后可以立即对这个节点修改和生效
- TTable中怎样得到第i行"name"的值?一定给分!!!
- 如何用DELPHI实现和WEBSERVER服务器端的CGI程序通讯?
- 怎样将用户输入的年月日(字符串)转化成日期类型进行sql查询
- 简单问题:PaintBox1如何清空画面
- open client & odbc
var
HFileRes: HFILE;
begin
Result := False;
if not FileExists(AFileName) then
exit;
HFileRes := CreateFile(pchar(AFileName), 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;