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

Вниз

Мастера, скажите, какое событие происходит?   Найти похожие ветки 

 
Roki   (2003-02-26 15:03) [0]

Когда DBEdit получает текст. Мне надо сделать чтобы если текст не поместился , то Hint получил бы значение поля.


 
Johnmen ©   (2003-02-26 16:03) [1]

OnChange возможно подойдет...


 
Roki   (2003-02-26 16:22) [2]

Спасибо, написал:
(Sender as TDBEdit).Hint := (Sender as TDBEdit).DataSource.DataSet.FieldByName((Sender as TDBEdit).DataField).AsString;
Работает высший класс.


 
ermserg ©   (2003-02-26 16:30) [3]

if Sender is TDBEdit then
TDBEdit(Sender).Hint := TDBEdit(Sender).Field.AsString


 
Roki   (2003-02-26 16:44) [4]


> if Sender is TDBEdit then
> TDBEdit(Sender).Hint := TDBEdit(Sender).Field.AsString

этот код у меня не работает когда меняется курсор НД...


 
Dona ©   (2003-02-26 16:47) [5]

В ДатаСорсе вроде есть обработчик события OnDataChange(Field)

если Assigned(Field) - то перемещаемся к др.записи


 
ermserg ©   (2003-02-26 16:50) [6]

Ti ne tot event ispolzuyesh. Lovi prichinu a ne sledstviye, obrabativay DataSet.AfterScroll


 
Roki   (2003-02-26 16:54) [7]

Вопрос закрыт. Работает так:
procedure TfMain.TXT_TCChange(Sender: TObject);
begin
(Sender as TDBEdit).Hint := (Sender as TDBEdit).DataSource.DataSet.FieldByName((Sender as TDBEdit).DataField).AsString;
end;

Причем у меня много едитов, и у всех этот обработчик....



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

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

Наверх




Память: 0.47 MB
Время: 0.014 c
6-54157
Dmitrij
2003-01-26 23:34
2003.03.17
Простой биллинг


3-53911
Roma111
2003-02-25 18:51
2003.03.17
Форматирование вывода в QRep


4-54379
Raph
2003-01-23 21:28
2003.03.17
Получение списка дисков


14-54197
frizZ.
2003-02-28 23:16
2003.03.17
Stack Overflow


6-54136
perseptron
2003-01-27 12:50
2003.03.17
Отображение процеса получения файла компонентом TNMStrmServ