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

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

Выбор из таблицы случайным образом. [D6, dBase, FoxPro]


badaxe ©   (2003-01-09 13:44:00) 

Народ, подскажите кто знает.
Каким образом лучше всего выбрать из таблицы (FOXPRO) случайным образом несколько записей?
Заранее спасибо.


Mike Kouzmine   (2003-01-09 14:16:00) [1]

a : array of Integer;
SetLength(a,I);
for J := 0 to I do a[J] := random(t.RecordCount);

onFilterRecord

Accept := Exist(t.RecNo,a)
Exist - напишешь сам.


Соловьев   (2003-01-09 13:54:00) [2]

Используй компонент TQuery.Свойство SQL:
SELECT *
FROM table_name
WHERE field1 = :p_random

Потом пишешь
Randomize;
with Query1 do
begin
Close;
ParamByName("p_random").asType := random(100);
Open;
end;


badaxe   (2003-01-09 13:48:00) [3]

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


Соловьев   (2003-01-09 13:46:00) [4]

Передавай параметр запросу - случайную величину или несколько.


Наверх

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