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

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

SQL [D7, WinME, Win2k]


LEXX_55 ©   (2004-11-26 08:30:00) 

Дорого времени суток, господа.
Я только начинаю работать с БД. Мне надо загнать результат запроса SQL в ячейку таблицы TStringGrid. Как это сделать? Заранее спасибо за помощь.


LEXX_55   (2004-11-26 08:51:00) [1]

СЕНК'С усе получилось.


Skyle   (2004-11-26 08:50:00) [2]

>  [2] LEXX_55   (26.11.04 08:42)
Вот.
Теперь мы знаем, что Query1 хранит результат запроса.
Следовательно, нужно эти данные оттуда взять и запуздырить в StringGrid1.
Насколько я помню, TStringGrid хранит данные в Cells.
Поэтому перенос будет где-то так выглядеть..

while not Query1.eof do
begin
 StringGrid1.Cells[ColIndex, Query1.RecNo] := Query1.FieldByName('MySupaName').AsString;
 Query1.Next;
end;


Поля по вкусу, убедиться, что RowCount соответствующий.

Вроде всё.


HSolo   (2004-11-26 08:48:00) [3]

StringGrid.Cells[i, j] := Query1.Fields[0].AsString;


LEXX_55   (2004-11-26 08:42:00) [4]

это тоже вопрос, я абсолютный чайник.
есть зарос:
         with MainForm.Query1 do begin
           Close;
           SQL.Clear;
           SQL.Add('SELECT KLIENT');
           SQL.Add('FROM ":KlientList:KlientList.db "');
           SQL.Add('WHERE');
           SQL.Add('TELEPHON LIKE "%' + MainForm.StringGrid1.Cells[2, i] + '%" ');
           SQL.Add('ORDER BY KLIENT');
           Open;
         end;

как после этого поместить результат в ячейку?


Skyle   (2004-11-26 08:37:00) [5]

А в чём храниться результат запроса?


Наверх

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