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

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

Как получить значение и индекс из сетки DBGrid? [D7, Paradox]


tempovik ©   (2007-12-18 00:48:00) 

Здравствуйте. Есть код:

procedure TForm1.DBGrid1MouseUp(Sender: TObject; Button: TMouseButton;
 Shift: TShiftState; X, Y: Integer);
var
 xxx : integer;
begin
 if DBGrid1.Focused = true then begin
    Как получить значение из этого поля, его индекс и название поля?
 end;
end;


Германн   (2007-12-18 02:04:00) [1]

Да не за что. Приходите ещё. Рад, что ты так сразу понял.

P.S. Надоело постить сообщения о том, что TDBGrid не содержит данных.
Надоело приводить аналогию с "трафаретом". И т.п. и т.д.


tempovik   (2007-12-18 01:25:00) [2]

procedure TForm1.DBGrid1MouseUp(Sender: TObject; Button: TMouseButton;
 Shift: TShiftState; X, Y: Integer);
var
 xxx : integer;
begin
 if DBGrid1.Focused = true then begin
  xxx := DataSource1.DataSet.Fields[0].AsInteger;
  ShowMessage (IntToStr (xxx));

 end;
end;
Пасибо Германн!!!

p.s.Замечательный форум. Всегда помогут коллеги.


Германн   (2007-12-18 01:17:00) [3]


> Как получить значение и индекс из сетки DBGrid?

Не там ищешь. Ищи в DataSet.


tempovik   (2007-12-18 00:57:00) [4]

Или даже ещё лучше уникальное поле (которое Fields[0]). Главное мне знать его значение. Неполучается -((((


Наверх

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