Вопросы по TDBGrid!

[bezOn]

Сообщение от $T@LKER

...как проследить положение индекатора записи в гриде...

Мне вот тоже было интересно, как определить (и как заставить стать в нужную) ячейку индикатора.

[Grag]

Если использовать гриды DevExpress лишь вместо обычных гридов, не используя других возможностей, то не стОит, уж слишком утяжеляется экзешник... неоправданно сильно...

[$T@LKER]

Если использовать гриды DevExpress лишь вместо обычных гридов, не используя других возможностей, то не стОит, уж слишком утяжеляется экзешник... неоправданно сильно...

У меня вот гриды DevExpress используют данные из обычных гридов! Есть там такая функция импорта! Ну вы понимаете о чём я! Тока вот не знаю как сделать то о чём писал я! Просто у меня при коике на любую строку в обычном гриде все данные снего выводились в отдельном месте - в эдитах! А как это мне зделать в этом DevExpress?! Можна было бы следить за перемещеие индикатора записи который меняет своё место положение взаисимости от выбраной записи но как это проследить?! Или может есть другой способ?!

[Stilet]

но как это проследить?

Помнится мне когда я пользовал эту гидоту, то там у него было свойство DataSource, а уже в компоненте его DataSet'а событие OnAfterScroll, возникающее при перемещении по набору.

[Филантроп]

как проследить положение индекатора записи в гриде?!

DbGrid1.DataSource.DataSet.RecNo

[Stilet]

DbGrid1

У Сталкера DevExpress а не DBGrid

[$T@LKER]

Помнится мне когда я пользовал эту гидоту, то там у него было свойство DataSource, а уже в компоненте его DataSet'а событие OnAfterScroll, возникающее при перемещении по набору.

- я не понимаю как его обработать%)! Писал типа:

dbgrid1.datasource.dataset.afterscroll

Но что сним делать дальше?! К чему приравнивать?! Какие условия?! Пробывал проверять на истенность - ошибка!

DbGrid1.DataSource.DataSet.RecNo

----Аналогичный вопрос! Насколько я понял возвращает целочисельный тип! Что мне с ним делать!?

Мне просто нужно отслдеживатьизменение активной записи(строки) в гриде! И всё! Мне не нужно знать там номер её или какая она точно и т.п.!!!

------

Вот это при старом гриде! Когда кликаем на какуюту строку в ньом!

//виведення даних із таблиці
procedure TAReview.DBGrid1CellClick(Column: TColumn);
begin
if (datamodule2.DataQuery.Active = true)
then begin
groupbox6.Visible := true;
//кілкість кімнат
edit9.Text := dbgrid1.Fields[2].AsString;
//планіровка
edit7.Text := dbgrid1.Fields[3].AsString;
//общая цена
edit12.Text := dbgrid1.Fields[4].AsString;
//цена за метр
edit1.Text := dbgrid1.Fields[5].AsString;
//валюта
edit6.Text := dbgrid1.Fields[6].AsString;
//район
edit11.Text := dbgrid1.Fields[7].AsString;
//вулиця
edit10.Text := dbgrid1.Fields[8].AsString;
//будинок
edit4.Text := dbgrid1.Fields[9].AsString;
//жилая
edit8.Text := dbgrid1.Fields[10].AsString;
//кухня
edit13.Text := dbgrid1.Fields[11].AsString;
//єтаж
edit14.Text := dbgrid1.Fields[12].AsString;
//єтажность
edit17.Text := dbgrid1.Fields[13].AsString;
//материал
edit15.Text := dbgrid1.Fields[14].AsString;
//телефон
edit18.Text := dbgrid1.Fields[15].AsString;
//телевізор
edit16.Text := dbgrid1.Fields[16].AsString;
//холодільник
edit19.Text := dbgrid1.Fields[17].AsString;
//мебель
edit20.Text := dbgrid1.Fields[18].AsString;
//предоплата
edit21.Text := dbgrid1.Fields[19].AsString;
//контактний телефон
edit22.Text := dbgrid1.Fields[20].AsString;
//примечание
memo1.Text := dbgrid1.Fields[21].AsString;
//дата
edit24.Text := dbgrid1.Fields[22].AsString;
end;

end;

Подсакжите аналог собитя DBGrid1CellClick в DevExpress если кто нить знает!!!???

У Сталкера DevExpress а не DBGrid

Точнее и то и другое! DevExpress использует DBGrid! А мне нужна помощь в том что я написал выше!

[Stilet]

Посмотри:http://yandex.ua/yandsearch?date=&te...mdoc=50&lr=187

Вот это при старом гриде!

У DataQuery опиши так же OnAfterScroll, как ты показал

Точнее и то и другое! DevExpress использует DBGrid!

Странно... Я помню что у него свой грид есть...

[$T@LKER]

Странно... Я помню что у него свой грид есть...

Я тока сегодня начал работать с DevExpress! Да и если не импортировать в него данные из обычного грида то придёться много переделывать в программе!

У DataQuery опиши так же OnAfterScroll, как ты показал

Делаю(AReview - название формы):

procedure TDataModule2.DataQueryAfterScroll(DataSet: TDataSet);
begin
if (datamodule2.DataQuery.Active = true)
then begin
AReview.groupbox6.Visible := true;
//кілкість кімнат
AReview.edit9.Text := AReview.dbgrid1.Fields[2].AsString;
end;

А при запуске программы какаято непонятная ошибка с адресами!!! Может изза того что DataQuery размещён нен а форме с гридом а на DataModule2???!!!!

[$T@LKER]

У DataQuery опиши так же OnAfterScroll, как ты показал

Круто! Всё заработало! Всем спасибо за помощь!!!