Innosetup or rather uninstall leaves the lck file behind.
Not really a problem more a nuisance, when you send
out an updated version. As the app creates it if it does
not exsist I was wondering how can I delete it when
I close the app. As it has a mainform I tried the on close
event with deletefile('dbisam.lck') but it doesnt work
so how can I destroy it on closing the app ?
Rita

Rita


Make sure you've close everything dbisam before you do so. Especially the session

Roy Lambert

"Roy Lambert" <roy.lambert@skynet.co.uk> wrote in message
news:87C1E9A7-7C2A-491F-9B8C-B1B10B8637B2@news.elevatesoft.com...
> Make sure you've close everything dbisam before you do so. Especially the
> session
>

Thanks Roy that nuked the fooker
Sorry about that but I just got around to
watching the movie on Sky.
It was so funny
Anyone else wants to know how I did it see below.
Main Form OnClose
var s:string;
begin
session.Active := false;
s := ExtractFilePath(Application.ExeName) + ExtractFileName('dbisam.lck');
win32check(SetFileAttributes(PCHAR(s ),FILE_ATTRIBUTE_NORMAL));
deletefile(s);   //switch this line off until you test
//if deletefile(s) then     // switch these lines on to test
//ShowMessage(s +' deleted OK')
//else ShowMessage(s +' not deleted, error = ' + IntToStr(GetLastError));

Rita