Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как правильно отловить выбранную ячейку в DBGrid [D5, Paradox]


Denizzz ©   (2003-09-17 09:07:00) 

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

В чем дело?


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

Спасибо!


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

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


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

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


ЮЮ   (2003-09-17 09:20:00) [4]

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

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


Denizzz   (2003-09-17 09:19:00) [5]

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

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


Ann   (2003-09-17 09:17:00) [6]

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо