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

Вниз

Глюк при DisableControls   Найти похожие ветки 

 
MsGuns ©   (2002-11-12 13:44) [0]

Добрый день мастерам ! Есть две связанные таблицы: RS-Master, RSSld-Detail (TTable, Paradox)

Фрагмент:

procedure WriteNewSaldoRS;
// Кросс-пересчет сальдо по всем расч.счетам
var
bmm,bmd: TBookMark;
...
begin
bmm := dmBank.tbRS.GetBookmark;
bmd := dmBank.tbRSSld.GetBookmark;
dmBank.tbRS.DisableControls;
dmBank.tbRSSld.DisableControls;
dmBank.tbRS.First;
// просмотр всех Расч.счетов
while not dmBank.tbRS.Eof do
begin
...
if dmBank.tbRSSld.RecordCount>0 then
begin
While Not dmBank.tbRSSld.Eof do
begin
// Здесь меняются неключи всех подчиненных записей
...
dmBank.tbRSSld.Post; // Вылет по Key Violate
dmBank.tbRSSld.Next;
end;
end;
dmBank.tbRS.Next;
end;
dmBank.tbRS.GotoBookmark(bmm);
dmBank.tbRSSld.GotoBookmark(bmd);
dmBank.tbRS.FreeBookmark(bmm);
dmBank.tbRSSld.FreeBookmark(bmd);
dmBank.tbRS.EnableControls;
dmBank.tbRSSld.EnableControls;


Комментарю строки с Enable/DisableControls - все работает, активизирую - глюк на посте первой же измененной записи. Где лоханулся ? Заранее благодарю.


 
Johnmen ©   (2002-11-12 13:52) [1]

А в чем глюк ?
Enable/DisableControls влияет только на отображение...


 
AngeL B.   (2002-11-12 13:56) [2]

Нет. Enable/DisableControls влияет в том числе на свойства связи главный-подчиненный и отключает эти связи. Вместо этого можно использовать свойство BlockReadSize.


 
MsGuns ©   (2002-11-12 14:02) [3]

>AngeL B. (12.11.02 13:56)

>Нет. Enable/DisableControls влияет в том числе на свойства связи главный-подчиненный и отключает эти связи. Вместо этого можно использовать свойство BlockReadSize.

Блин, я так и подумал ! Но Вы очень хорошо конкретизировали ! Большое спасибо ! А можно поподробнее о BlocReadSize ?





 
Johnmen ©   (2002-11-12 14:11) [4]

Да, действительно...Впрочем, достаточно почитать хелп по DisableControls...


 
MsGuns ©   (2002-11-12 14:53) [5]

.. Действительно. А вот с BlockReadSize для BDE я так и не понял 8((



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

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

Наверх




Память: 0.47 MB
Время: 0.01 c
1-92960
BIN
2002-11-18 09:19
2002.11.28
ScrollBox


14-93201
Sirus
2002-11-09 14:32
2002.11.28
Почему компоненты отображаются криво???


1-93001
Versus31
2002-11-17 10:43
2002.11.28
2 TWebBrowser на одной форме. Как связать?


1-93065
mmb1
2002-11-15 19:50
2002.11.28
Не перерисовывается PaintBox


1-92987
billybons
2002-11-18 10:54
2002.11.28
алгоритм кодирования Хафмена