Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.21;
Скачать: [xml.tar.bz2];



Вниз

Это глюк или я чего-то не понимаю? 

drpass   (2002-01-28 14:26) [0]

Самый простой вариант этой ситуации:
Form1 в Unit1 и DataModule1 в Unit2.
В DataModule:
Ibtable1->DataSource1
В Form1:
Label1

Обработчик
DataSource1OnDataChange(...)
begin
Form1.Label1.Caption:=IBTable1Field1.AsString;
end;

Все работает, в свойство Caption записывается правильное содержимое, но... не отображается на экране, т.е., внешний вид Label не обновляется, даже после вызова Update! Вернее, обновляется - но только при первом срабатывании обработчика во время открытия таблицы
Это касается любого типа данных и любых компонент (DataControls работают без проблем), и других событий, например, TIBTable.AfterScroll

Переношу DataSource из DataModule1 на Form1 - все начинает работать, как и должно было.
Почему???

---

asafr   (2002-01-28 16:36) [1]

DataModule1.DataSource1OnDataChange(...)
begin
Form1.Label1.Caption:=IBTable1Field1.AsString;
end;

---

drpass   (2002-01-28 18:26) [2]

Угу, как раз так он и не работает

---

RAVEN   (2002-01-29 09:14) [3]

Попробуй Application.ProcessMessages после присваивания Form1.Label1.Caption:=IBTable1Field1.AsString;
Application.ProcessMessages;

---

AndrewK   (2002-01-29 09:21) [4]

Попробуй Form1.Label1.Refresh после Form1.Label1.Caption:=IBTable1Field1.AsString;

Label может просто не прорисовываться.

---

Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.21;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.72 MB
Время: 0.024 c