Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Базы";
Текущий архив: 2003.10.06;
Скачать: [xml.tar.bz2];

Вниз

Как правильно отловить выбранную ячейку в DBGrid   Найти похожие ветки 

 
Denizzz   (2003-09-17 09:07) [0]

Почему-то непрокатывает:
procedure TFForm1.DBGrid2DrawDataCell(Sender: TObject; const Rect: TRect;
Field: TField; State: TGridDrawState);
begin
if (gdFocused in State) then
if (Field.FieldName =...

В чем дело?


 
Ann   (2003-09-17 09:17) [1]

вроде все правильно.. может дальше где-то условие не выполняется?


 
Denizzz   (2003-09-17 09:19) [2]

По логике
...if (gdFocused in State) then
ShowMessage(Field.FieldName)...

покажет сообщение с именем текущего поля.
Или нет?


 
ЮЮ   (2003-09-17 09:20) [3]

Что значит не прокатывает?

1) вместо gdFocused, пожалуй, следует рассматривать gdSelected
2) сравнивать текстовые строки в одном регистре
if AnsiCompareText(Field.FieldName, "...") = 0


 
Vlad   (2003-09-17 10:04) [4]

procedure TFForm1.DBGrid2Draw ColumnCell(Sender: TDBGrid;
const Rect: TRect; DataCol: Integer; Column: TColumn;
State: TGridDrawState);
begin
if ( gdSelected in State) then
if ( Column.FieldName=...


 
Vlad   (2003-09-17 10:15) [5]

Забыл сказать, не вздумай туда ShowMessage ставить


 
Denizzz   (2003-09-17 12:01) [6]

Спасибо!



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

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

Наверх




Память: 0.45 MB
Время: 0.009 c
6-18495
Vinnety
2003-08-09 17:14
2003.10.06
Массив записей через сокет


3-18219
ЭД
2003-09-17 12:06
2003.10.06
ClientDataSet.RefreshRecord не работает


14-18566
Help
2003-09-18 14:37
2003.10.06
Про Р4


1-18380
Help
2003-09-22 18:04
2003.10.06
Иконка


1-18326
Gaber-IIEP
2003-09-23 18:39
2003.10.06
Delphi 6.0 vs Delphi 7.0





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский