![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Цикл пока недостикнит конца запроса
voe © (2007-09-06 16:19:00)Как мне написать цик чтобы он выполнялся пока в небудет достигнут придел выборки данных.
т.е.
мне нужно результаты запроса поместить в компанент Memo предворительно их обработав
MsGuns (2007-09-07 00:20:00) [1]А вот кому нужен этот мемо с эдакой мешаниной ?
Shirson (2007-09-06 22:15:00) [2]
> voe (06.09.07 17:03) [15]
> Memo1.Lines.Add(query.FieldValues['ID_UDOKKLS'] делаю так.
> Но мне хотелось бы сразу вытащить все поля и запихатьих
> в Мемо
var a:integer;
s:string;
begin
...
while not query.EOF do
begin
s:='';
for a :=0 to query.FieldCount-1 do
s:=s+query.Fields[a].AsString;
memo1.lines.add(s);
query.Next;
end;
...
end;
Или что-то в этом роде.
Сергей М. (2007-09-06 17:27:00) [3]
> Германн © (06.09.07 17:14) [17]
>
>
> TDBGrid. Он тебе поможет.
С гридом и мартышка сумеет управиться)
Ему, вишь ли, нужно именно в Мемо и именно "запихать")
Германн (2007-09-06 17:14:00) [4]
> Но мне хотелось бы сразу вытащить все поля и запихатьих
> в Мемо
Найди в палитре компонентов закладку "Data Controls" на ней есть компонент TDBGrid. Он тебе поможет.
Сергей М. (2007-09-06 17:05:00) [5]
> мне хотелось бы сразу
Сразу только у кроликов)
Что вообще значит твое "сразу" ? Одной строчкой кода что ли ?
voe (2007-09-06 17:03:00) [6]Memo1.Lines.Add(query.FieldValues['ID_UDOKKLS'] делаю так.
Но мне хотелось бы сразу вытащить все поля и запихатьих в Мемо
Сергей М. (2007-09-06 16:58:00) [7]
> Что мне то делать?
Тебе что, заняться нечем ?)
novill (2007-09-06 16:58:00) [8]> [11] voe (06.09.07 16:56)
Так тебе на первый вопрос ответили, на второй сам ответил.
maslcs (2007-09-06 16:57:00) [9]какой компанент query используешь?
voe (2007-09-06 16:56:00) [10]Что мне то делать?
Anatoly Podgoretsky (2007-09-06 16:50:00) [11]> Германн (06.09.2007 16:45:09) [9]
> Учебный год начался.
Как уже?
Как годы летят
Германн (2007-09-06 16:45:00) [12]
> Johnmen © (06.09.07 16:28) [3]
>
> Атака ламеров (или клоунов, что тоже вероятно) продолжается.
> ..
>
Учебный год начался. Через 9 месяцев атаки на время прекратятся :-)
Сергей М. (2007-09-06 16:44:00) [13]
> как мне вытащить несколько значений полей из query
GetCurrentRecord
voe (2007-09-06 16:43:00) [14]Гвозди?
Dib@zol (2007-09-06 16:39:00) [15]> Как мне написать цик
С гвоздями или без?
Desdechado (2007-09-06 16:37:00) [16]TQuery + F1
voe (2007-09-06 16:31:00) [17]А мне удавится что ли?
Помогите?
Johnmen (2007-09-06 16:28:00) [18]Атака ламеров (или клоунов, что тоже вероятно) продолжается...
voe (2007-09-06 16:25:00) [19]Большое спасибо.
Не подскажеш как мне вытащить несколько значений полей из query?
Memo1.Lines.Add ????
Desdechado (2007-09-06 16:20:00) [20]
while( not query.EOF ) do begin
....
Next;
end;