I
inbreak
Unregistered / Unconfirmed
GUEST, unregistred user!
如题。我在作一个数据库的程序。
可是有一个麻烦。我是想法是只发布一个可执行文件,数据库是后期创建的。。
也就是说,我要在程序启动时检查有没有luozs.db 文件,没有就创建。有就不创建喽。
程序如下:
var
Luozs:string;
begin
Luozs:='Luozs.db';
if Luozs <> (ExtractFilePath(Application.ExeName)+luozs) then
{先检查目录下是否存在 Luozs.db 数据库,如果不存在则...}
begin
showmessage('数据库不存在');
................{此部分为我创建数据库的部分}
end;
end;
当然编译说,不管有没有luozs.db文件。程序都说‘数据库不存在’(也就是我showmessage的那句话)
各位大哥各位大姐各位侠,帮帮小弟。。
小弟现在正在线等待中 ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄
可是有一个麻烦。我是想法是只发布一个可执行文件,数据库是后期创建的。。
也就是说,我要在程序启动时检查有没有luozs.db 文件,没有就创建。有就不创建喽。
程序如下:
var
Luozs:string;
begin
Luozs:='Luozs.db';
if Luozs <> (ExtractFilePath(Application.ExeName)+luozs) then
{先检查目录下是否存在 Luozs.db 数据库,如果不存在则...}
begin
showmessage('数据库不存在');
................{此部分为我创建数据库的部分}
end;
end;
当然编译说,不管有没有luozs.db文件。程序都说‘数据库不存在’(也就是我showmessage的那句话)
各位大哥各位大姐各位侠,帮帮小弟。。
小弟现在正在线等待中 ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄