Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2007.10.07;
Скачать: [xml.tar.bz2];

Вниз

Цикл пока недостикнит конца запроса   Найти похожие ветки 

 
voe   (2007-09-06 16:19) [0]

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


 
Desdechado ©   (2007-09-06 16:20) [1]

while( not query.EOF ) do begin
....
Next;
end;


 
voe   (2007-09-06 16:25) [2]

Большое спасибо.

Не подскажеш как мне вытащить несколько значений полей из query?

Memo1.Lines.Add  ????


 
Johnmen ©   (2007-09-06 16:28) [3]

Атака ламеров (или клоунов, что тоже вероятно) продолжается...


 
voe   (2007-09-06 16:31) [4]

А мне удавится что ли?
Помогите?


 
Desdechado ©   (2007-09-06 16:37) [5]

TQuery + F1


 
Dib@zol ©   (2007-09-06 16:39) [6]

> Как мне написать цик

С гвоздями или без?


 
voe   (2007-09-06 16:43) [7]

Гвозди?


 
Сергей М. ©   (2007-09-06 16:44) [8]


> как мне вытащить несколько значений полей из query


GetCurrentRecord


 
Германн ©   (2007-09-06 16:45) [9]


> Johnmen ©   (06.09.07 16:28) [3]
>
> Атака ламеров (или клоунов, что тоже вероятно) продолжается.
> ..
>

Учебный год начался. Через 9 месяцев атаки на время прекратятся :-)


 
Anatoly Podgoretsky ©   (2007-09-06 16:50) [10]

> Германн  (06.09.2007 16:45:09)  [9]

> Учебный год начался.

Как уже?
Как годы летят


 
voe   (2007-09-06 16:56) [11]

Что мне то делать?


 
maslcs   (2007-09-06 16:57) [12]

какой компанент query используешь?


 
novill ©   (2007-09-06 16:58) [13]

> [11] voe   (06.09.07 16:56)
Так тебе на первый вопрос ответили, на второй сам ответил.


 
Сергей М. ©   (2007-09-06 16:58) [14]


> Что мне то делать?


Тебе что, заняться нечем ?)


 
voe   (2007-09-06 17:03) [15]

Memo1.Lines.Add(query.FieldValues["ID_UDOKKLS"] делаю так.
Но мне хотелось бы сразу вытащить все поля и запихатьих в Мемо


 
Сергей М. ©   (2007-09-06 17:05) [16]


> мне хотелось бы сразу


Сразу только у кроликов)

Что вообще значит твое "сразу" ? Одной строчкой кода что ли ?


 
Германн ©   (2007-09-06 17:14) [17]


> Но мне хотелось бы сразу вытащить все поля и запихатьих
> в Мемо

Найди в палитре компонентов закладку "Data Controls" на ней есть компонент TDBGrid. Он тебе поможет.


 
Сергей М. ©   (2007-09-06 17:27) [18]


> Германн ©   (06.09.07 17:14) [17]
>
>


> TDBGrid. Он тебе поможет.


С гридом и мартышка сумеет управиться)

Ему, вишь ли, нужно именно в Мемо и именно "запихать")


 
Shirson ©   (2007-09-06 22:15) [19]


> 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;


Или что-то в этом роде.


 
MsGuns ©   (2007-09-07 00:20) [20]

А вот кому нужен этот мемо с эдакой мешаниной ?



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2007.10.07;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.48 MB
Время: 0.045 c
2-1189331798
zzz0001
2007-09-09 13:56
2007.10.07
В ЧЕМ ОШИБКА???


3-1180925040
Slider007
2007-06-04 06:44
2007.10.07
Даты в хранимых процедурах (FireBird 1.5)


2-1188800107
Андрей Пл
2007-09-03 10:15
2007.10.07
Изменение определенной строки в txt файле.


6-1170855151
Zelius
2007-02-07 16:32
2007.10.07
Можно ли скрестить Indy TidHTTP и NTML аутентификацию?


6-1170735552
Змей-Горыныч
2007-02-06 07:19
2007.10.07
Пограмное переподключение к интернет





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский