ADO

[Killbrum]

Здраствуйте! Вот тут пишу програмку... у меня вопрос. Как достать данные из DBGrid? Допустим у меня есть текст в первой колонке "ыфвфыв" как этот текст записать в Едит? Спасибо!

[Valera]

Form1.Table1.RecNo:=int;
(*Задаем первый вопрос и помещаем варианты ответов на разные кнопки*)
y:=Form1.Table1.FieldByName('Name of field).Value; Edit1.Text:=y;

[Valera]

Задаем номер записи
Form1.Table1.RecNo:=int;
Затем выбираем данные и помещаем в Edit
y:=Form1.Table1.FieldByName('Name of field).Value; Edit1.Text:=y;

[Gorychev]

Сначала нужно перейти на нужную запись(по счету), а потом прочитать значение, в нужном вам столбце.
Помогут методы FIrst, Last, Next, Prior, MoveBy - для навигации по таблице программным путем.

Для примера - переход на десятую по счету запись и считывание значения в первом поле:

  ADOTable1.First;
  ADOTable1.MoveBy(9);
  edit1.Text:=  ADOTable1.fields.Fields[0].AsString;

Чтоб пройтись по все элементам таблицы, используйте цикл While + свойство EOF.

В любой книге по Делфи в которой есть глава "Работа с базами данных" вы найдете ответы на вопросы которые могут впоследствии возникнуть...

[hoza_syl]

Как достать данные из DBGrid?

Из DBGrid кажысь нельзя - надо из таблицы. Выше есть как зделать.

[Killbrum]

Спасибо уже решил )))) даже очень простым методом

Edit1.Text:=Form1.BookNameWideStringField.AsString;
Edit2.Text:=Form1.BookNameWideStringField2.AsString;
Edit3.Text:=Form1.BookNameWideStringField3.AsString;
Edit4.Text:=Form1.BookNameWideStringField4.AsString;
Edit5.Text:=Form1.BookNameWideStringField5.AsString;
Edit6.Text:=Form1.BookNameWideStringField6.AsString;
Edit7.Text:=Form1.BookNameWideStringField7.AsString;
Edit8.Text:=Form1.BookNameICQ.AsString;
Edit9.Text:=Form1.BookNameWideStringField8.AsString;