КД> бррр...
КД> я правильно понимаю, чо на время пока работает новый поток, в основном
КД> потоке ты полностью запрещаешь работу с базой????
Да ... для некоторых задач это аксиома, для некоторых - нет ...
КД> кстати, может ты пропустил, что бы меньше писать, но я не видел, что бы ты
КД> создаваемому коннекту присваивал параметы подключения.
Пропустил ...
DB.SqlDialect := 3;
DB.LibraryName := IfThen(ini.ReadBool('DB', 'Local', True), apdir, '') +
ini.ReadString('DB','Library', 'fbclient.dll');
DB.DBName := IfThen(ini.ReadBool('DB', 'Local', True), '',
ini.ReadString('DB','Server','localhost') + ':') + // Подерживаем
ТОЛЬКО TCP/IP
ini.ReadString('DB','DataBase',apdir + 'BASE.DAT');
DB.ConnectParams.UserName := ini.ReadString('DB','SYSUSER','SYSDBA');
DB.ConnectParams.Password := ini.ReadString('DB','SYSPASS','masterkey');
DB.ConnectParams.CharSet := 'WIN1251';
DB.UpperOldNames := True;
DB.AfterRestoreConnect := DBAfterRestoreConnect;
DB.OnErrorRestoreConnect := DBErrorRestoreConnect;
DB.OnLostConnect := DBLostConnect;
Trans.DefaultDatabase := DB;
DB.DefaultTransaction := Trans;
С уважением,
Константин Григорьевич.
===============