Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.11.21;
Скачать: CL | DM;

Вниз

Присвоение TDataBase.DataBaseName приводит к AV...   Найти похожие ветки 

 
Aleksandr   (2004-10-20 14:04) [0]

В многопоточном приложении в Execute каждого потока создается экземпляр TDataBase:

var
 pS     : TSession;
 pD     : TDataBase;
begin
 WaitForSingleObject(TSCPT, 100000);
 pS:=TSession.Create(nil);
 pD:=TDataBase.Create(nil);
 try
   pS.SessionName:="px"+IntToStr(Random(4000)+1);
   Ps.Name:="psession"+ps.SessionName;
   pD.HandleShared:=true;
   pD.DatabaseName:=FDir;
...

Код я оставил по строчку pD.DatabaseName:=FDir; по той причине, что выполнение этой строки время от времени вызывает в потоке EAccessViolation. FDir - свойство потока, передаваемое ему в констрактор, является папкой, в которой будет работать поток с таблицей парадокса. На три десятка потоков таких папок 4 штуки.


 
msguns ©   (2004-10-20 16:37) [1]

>В многопоточном приложении в Execute каждого потока создается экземпляр TDataBase:

Позвольте полюбопытствовать - а зачем ?


 
Aleksandr.   (2004-10-20 20:32) [2]

msguns © :
А Вы полагаете, что с BDE разные потоки могут работать через один TDataBase?



Страницы: 1 вся ветка

Текущий архив: 2004.11.21;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.045 c
14-1099753777
X9
2004-11-06 18:09
2004.11.21
Исходники TurboVision?


14-1099563212
Deniz
2004-11-04 13:13
2004.11.21
Delphi7 & Delphi8


1-1099780146
Змей
2004-11-07 01:29
2004.11.21
treeview


1-1099698525
Лёха
2004-11-06 02:48
2004.11.21
Jpeg -> TFileStream


1-1099379935
leonidus
2004-11-02 10:18
2004.11.21
Вопрос по созданию класса