Как обратится к конкретной ячейке

[loki22208]

Введение:
Дана элементарная база данных аксес(всего одна таблица). Нужно произвести над ней в делфи элементарные действия(найти запись с максимальной ценой, выбрать записи удовл. определенным условиям и т.п).
Проблема:
Вобщем саму базу данных в делфи я загрузил(при помощи ADOConnection, AdoTable, DataSource и вывел все на форму при помощи dbgrida). А как обратится к конкретной ячейке ума не приложу.
Нашел вот такую штуку
dbgrid1.Fields[0].AsString
но она работает тока с первой записью.
Вобщем если кто нить может подсказать как выйти из положения не углублясь в тонкости работы с БД, подскажите пожалуйста.

ps. ногами не бить, с БД в делфи первый раз работаю. Мануалы пробовал почитать, но там все слишком заморочено получается, уверен можно проще выход найти.

[Grag]

Она работает с той записью, на которую установлен курсор в DataSet...

[Optigood]

Аналогичный вопрос... Имеется БД, из неё нужно по шаблону составить отчет...

procedure TForm2.Image1Click(Sender: TObject);
var
 WordApp, doc:Variant;
 Vr: OleVariant;
begin
 try
  WordApp:= CreateOleObject('Word.Application');
  doc:=WordApp.documents.Open(ExtractFilePath(Application.ExeName)+'DocTemplate.doc');
  WordApp.ActiveDocument.SaveAs(ExtractFilePath(Application.ExeName)+'DocTemplate1.doc');

  WordApp.Visible:=true;
  WordApp.Selection.GoTo(-1, unAssigned, unAssigned, 'Familiya');
  WordApp.Selection.TypeText('Фленов Михаил');

  WordApp.Selection.GoTo(-1, unAssigned, unAssigned, 'Date');
  WordApp.Selection.TypeText(FormatDateTime('dddddd', Date));
 except
  Screen.Cursor:=crDefault;
 end;

Код обращения к шаблону есть, а вот как сделать, чтобы программа брала из БД фамилию и т.д. по установленному курсору не знаю...

[loki22208]

Как же тогда запустить цикл который будет пробегать все значения конкретного поля?

[Grag]

Сообщение от loki22208

Как же тогда запустить цикл который будет пробегать все значения конкретного поля?

Так:

DataSet.First;
while not DataSet.Eof do
  Что-то:=DataSet.Fields[0].AsVariant

[loki22208]

Оформил так:
datasource1.DataSet.First;
while not datasource1.DataSet.Eof do
listbox1.Items.Add(datasource1.Data Set.Fields[2].Asstring);
В итоге прога циклится

[loki22208]

Все с задачей справился вот таким образом:
for i:=1 to booktable.RecordCount do begin
booktable.RecNo:=i;
x:=booktable.Fields[2].AsString;
end;
Всем огромное спасибо

[Grag]

Сообщение от loki22208

Оформил так:
datasource1.DataSet.First;
while not datasource1.DataSet.Eof do
listbox1.Items.Add(datasource1.Data Set.Fields[2].Asstring);
В итоге прога циклится

Если чуток подумать, то можно было бы добавить строчку
datasource1.DataSet.Next
записи то перебирать нужно, а не стоять на одной и той же. Тогда и цикл не будет бесконечным...

[loki22208]

Сообщение от Grag

Если чуток подумать, то можно было бы добавить строчку
datasource1.DataSet.Next
записи то перебирать нужно, а не стоять на одной и той же. Тогда и цикл не будет бесконечным...

Спасиб, учту на будущее))