Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Delphi [игнор отключен] [закрыт для гостей] / TDataSource.OnDataChange работает не правильно с TcxGrid / 3 сообщений из 3, страница 1 из 1
10.08.2021, 23:26
    #40089971
Valery_B
Valery_B
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
TDataSource.OnDataChange работает не правильно с TcxGrid
Если поставить обработчик на событие OnDataChange, то оно работает не правильно - включается 2 раза за место одного.
Но это происходит, только если TDataSource связан с TcxGrid, с обычным TDBGrid такого нет.
Может кто нибудь знает, как это починить не делая костылей ?
Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
procedure TForm1.Button1Click(Sender: TObject);
begin
 Memo1.Lines.Clear;
 dxMemData1.DisableControls;
 dxMemData1.Close;
 dxMemData1.Open;
 dxMemData1.EnableControls;
end;

procedure TForm1.DataSource1DataChange(Sender: TObject; Field: TField);
begin
 Memo1.Lines.Add('xexe '+Memo1.Lines.Count.ToString);
end;
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.08.2021, 04:09
    #40089986
ma1tus
ma1tus
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
TDataSource.OnDataChange работает не правильно с TcxGrid
Valery_B,

загугли уже форум - рассмотри перенос логики в AfterScroll с проверкой на ControlsDisabled
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.08.2021, 19:48
    #40090156
Гаджимурадов Рустам
Гаджимурадов Рустам
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
TDataSource.OnDataChange работает не правильно с TcxGrid
Valery_B,

Таки подтяните грамматику - хотя бы спелл-чекер в браузер
установите - ибо 3 ошибки на 1 абзац - это многовато...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Delphi [игнор отключен] [закрыт для гостей] / TDataSource.OnDataChange работает не правильно с TcxGrid / 3 сообщений из 3, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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