Почему не работает код?

[иванлеон]

Почему не работает код Deplhi lite 7.3.4.3 win7 64x?
Выдаёт ошибку -

В Win Xp - работает.

Form1.tbl1.Active:=False;
Form1.tbl1.DatabaseName:=ExtractFilePath(ParamStr(0));
Form1.tbl1.TableName:='all_loto.db';
Form1.tbl1.TableType:=ttParadox;

if not FileExists(ExtractFilePath(ParamStr(0))+'all_loto.db') then
begin

Form1.tbl1.FieldDefs.Clear;

Form1.tbl1.FieldDefs.Add('date',ftString,10,True);
Form1.tbl1.FieldDefs.Add('info',ftString,256,True);
Form1.tbl1.FieldDefs.Add('seriya',ftString,10,True);
Form1.tbl1.FieldDefs.Add('zena',ftInteger,0,False);
Form1.tbl1.FieldDefs.Add('kol_vo',ftInteger,0,False);
Form1.tbl1.CreateTable;
end;

Form1.tbl1.Active:=True;

[BARNEY]

а не чего в директории С создать всё что не попадя

[rdama]

BARNEY, ну он там ничего не создает. Это особенности работы BDE. Это она там свой файлик ищет.
Правда я бы сказал более категорично.
Нафиг BDE! Не тревожте мертвых.
Некромант новоявленный.

[superedward]

Как вариант - запустить под админом

[Аватар]

У TDataBase есть свойство, в котором можно указать каталог для этого файла. Какое свойство забыл.

[Serge_Bliznykov]

Сообщение от Аватар

У TDataBase есть свойство, в котором можно указать каталог для этого файла. Какое свойство забыл.

речь про это?

[Stilet]

в котором можно указать каталог для этого файла

Так собсно

Form1.tbl1.DatabaseName:=ExtractFilePath(ParamStr(0));

Так что не в нем проблема.
Проблема четенько описана на скрине - Писать в файл запрещено. Нужно давать доступ на запись для этого пользователя на тот каталог. Возможно придется покапаться в политике безопасности, если конечно запуск с правами админа не поможет.

[Аватар]

речь про это?

Наверно и этим можно воспользоваться, подглядел в старых прогах - использовал не свойство из DataBase, а Session.NetFileDir. Если соединения множественные, то и в Session.PrivateDir для каждого соединения нужен свой каталог, иначе будут конфликты с временными файлами BDE

[Sciv]

Сорри за офтоп, но как вы умудряетесь так ставить дельфи БДЕ, что они не работают? Я одно время почти год сидел не Win7 x64 так без всяких допнастроек все пахало как трактор.

[Serge_Bliznykov]

Я одно время почти год сидел не Win7 x64 так без всяких допнастроек все пахало как трактор.

Думаю, что это у Вас было ввиду отключённого UAC. С включённым контролем Вы в корне диска C:\ файл (любой) создать не сможете! (впрочем, так же, как не сможете создать файл в папке Program Files и Windows - ибо ОС лучше Вас знает: "нефик лезть туда, куда лезть не надо"!)
Ещё не забывайте, что у автора топика - Paradox (у каждой СУБД под BDE свои настройки и фишки....). Вы тоже с .DB файлами через BDE работали "как трактор"?!


это мои предположения, сам я BDE под 7-кой не проверял, и, если Бог милует, то и не буду...