Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Создание файла dbf (локально) [D7]


Alexandr CH_ ©   (2003-07-07 12:18:00) 

Требуется создать dbf локально

Есть код

procedure TFormConvertSpr.ToolButton5Click(Sender: TObject);
begin
If not DMConvert.TableOutNomenkl.Exists then begin
IF MessageDlg("Файл не найден. Создать новый?", mtError, [mbYes, mbNo, mbCancel],0)=mrYes then begin
DMConvert.TableOutNomenkl.CreateTable;
end; // If Message
end; // if not
end;


Все работает. Если файла нет, он действительно создается.
Но если файл есть, то условие not exists все равно выполняется и
он пытается создаться заново. Как это понять, почему он файл не видит?


MsGuns   (2003-07-07 13:08:00) [1]

Чем отличается таблица от файла ?
Правильно, во второй нет понятия "Поля" ;))


Alexandr CH_   (2003-07-07 12:27:00) [2]

С if not FileExists(...) then все правильно.
Но почему?
Почему таблицы-то нету?


MsGuns   (2003-07-07 12:23:00) [3]

Файл-то может и есть, а вот таблицы нетути ;)


stone   (2003-07-07 12:21:00) [4]

Попробуй проверять наличие физического файла

if not FileExists(...) then


Наверх

Титульная страница Поиск, карта сайта Написать письмо