Доступ к базе из нескольких модулей

[amigo555]

Здравствуйте! Есть программа, использующая SQLite, как описано здесь: http://www.delphi.int.ru/articles/43/
Сделал, все, как там описано, все работает, поменял только в разделе implementation имя глобального объекта для работы с базой sldb: TSQLiteDatabase на MAIN_DB: TSQLiteDatabase.

Но возникла необходимость добавить в программу дополнительные формы, которые тоже используют этот объект MAIN_DB.
Сначала я из implementation перенес его в раздел Public, но компилятор стал ругаться: Undeclared Identifier: TSQLiteDatabase.
Аналогичная ситуация, когда я поместил его вот сюда

unit main;
...
private
    
    { Private declarations }

public

    { Public declarations }
    MAIN_DB:TSQLiteDatabase;//Поместил его сначала сюда
end;

var
  Form1: TForm1;
  MAIN_DB:TSQLiteDatabase;//Потом вот сюда

implementation

...

end.

Модули друг к другу все подключены.
Пожалуйста, подскажите, что я делаю неправильно, как сделать, чтобы БД была видна из всех модулей?

[KingOfNothing]

Попробуй так обращаться из других модулей -

main.MAIN_DB

когда он в var

[amigo555]

Вся фигня в том, что даже когда в других модулях нет обращений к MAIN_DB , программа все равно не компилится, а компилятор ругается на Undeclared Identifier.
Интересно, что когда я поместил MAIN_DB в раздел var того модуля, где описан сам этот класс TSQLiteDatabase, т.е. модуля SQLiteTable3, все остальные модули этот объект увидели. Но, во-первых, пришлось править сторонний модуль, что не очень красиво, а, во-вторых, хочется понять, почему все-таки такое произошло. Часто ведь бывает, что класс описан в одном модуле, а объект в другом!

[KingOfNothing]

а в main в uses точно было - SQLiteTable3? а во всех остальных модулях в uses был main?

[amigo555]

Если ты про тот uses, что в разделе implementation, а не в interface, то да, он там как раз и есть. Переключился на модуль main, потом в меню File->Use Unit, выбрал SQLite3 и SQLiteTable3. Потом из других модулей аналогично подцепил эти модули и main. Теоретически все должны друг друга видеть.

[koma_grusha]

в каждый модуль, в котором объявлена переменная класса TSQLiteDatabase, в interface > uses пропиши тот юнит, где живет класс TSQLiteDatabase, а если в implementation он уже есть, то лучше перенеси наверх, потому что по смыслу ошибки явно видно, что он не знает откуда брать данные для этого класса

[amigo555]

Получается, что uses в разделе interface обладает бОльшим приоритетом, чем uses в implementation? Перенес в interface > uses сразу SQLiteTable3 и SQLite3. Сейчас объект виден в тех модулях, которые используют main. Не будет ошибкой, что я перенес туда сразу два модуля (на всякий случай)?

[koma_grusha]

нет ошибкой не будет, но если ты вторую не используешь, то лучше не хлами прогу.