powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / C++ [игнор отключен] [закрыт для гостей] / Странная ошибка
2 сообщений из 2, страница 1 из 1
Странная ошибка
    #34610269
dj_raven
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Есть такой код:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.
void __fastcall TForm1::DBGrid2CellClick(TColumn *Column)
{
   AnsiString S="";
   int no;

   if (Column->FieldName == "Select"){
      ADOQuery1->Edit();
      if (ADOQuery1->Fields->Fields[ 3 ]->AsBoolean){
         ADOQuery1->Fields->Fields[ 3 ]->Value=false;
      }
      else{
         ADOQuery1->Fields->Fields[ 3 ]->Value=true;
      }
      ADOQuery1->Post(); //oshibka viskakivajet zdesj

      ADOQuery2->Filtered=false;
      no=ADOQuery1->RecNo;
      ADOQuery1->First();
      for(int x= 0 ; x<ADOQuery1->RecordCount; x++){
         if(ADOQuery1->FieldValues["sel"]){
            if(S.Length()!= 0 ){
               S+=" OR ";
            }
            S+="table_id = " + IntToStr(ADOQuery1->Fields->Fields[ 0 ]->AsInteger);
         }
         UpdateLogicalField();
         ADOQuery1->Next();
      }
      if (S.Length()!= 0 ){
         ADOQuery2->Filter=S;
      }
      else{
         ADOQuery2->Filter="id=0";
      }
      ADOQuery2->Filtered=true;
   }
   ADOQuery1->RecNo=no;
   ADOQuery2->Requery();
   DBGrid3->Refresh();
}
Код вызывается когда кликаешь по ячейке в колонке Select в компоненте TDBGrid, в которой изображён CheckBox. При первом клике код прохлдит нормально. Проблемма возникает при втором клике по ячейке в колонке. Если кликаешь по какой-нибудь другой записи в базе данных.

Код Eventa прорисовки:

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
void __fastcall TForm1::DBGrid2DrawColumnCell(TObject *Sender,
      const TRect &Rect, int DataCol, TColumn *Column,
      TGridDrawState State)
{
   int Style;
   if (Column->FieldName == "Select"){
       if (ADOQuery1->Fields->Fields[ 3 ]->AsBoolean){
          Style= DFCS_CHECKED;
       }
       else{
          Style = DFCS_BUTTONCHECK;
       }
       DrawFrameControl(DBGrid2->Canvas->Handle, (LPRECT)&Rect, DFC_BUTTON, Style);
   }

}
...
Рейтинг: 0 / 0
Странная ошибка
    #34610380
dj_raven
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
nde, zabil sam screen oshibki dobavitj. vot on:
...
Рейтинг: 0 / 0
2 сообщений из 2, страница 1 из 1
Форумы / C++ [игнор отключен] [закрыт для гостей] / Странная ошибка
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]