Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 15.08.2011, 15:28
marales marales вне форума
Прохожий
 
Регистрация: 04.08.2011
Сообщения: 13
Репутация: 10
По умолчанию Помогите c Ado

Вообщем мне надо при нажатии кнопки в ado table перешла запись на случайное число. Например в табл. курсор на первой записи в таблице, нажимаю на кнопку и курсор переходит на случайную строчку записи, например перешла на 5 запись. просто подскажите код перехода по записям. спасибо
Ответить с цитированием
  #2  
Старый 15.08.2011, 15:50
Аватар для Viajero
Viajero Viajero вне форума
Активный
 
Регистрация: 14.06.2011
Адрес: РБ
Сообщения: 214
Версия Delphi: Delphi 7 FB 2.5
Репутация: 5849
По умолчанию

посмотри
http://www.delphisources.ru/forum/sh...4842#post84842

Не совсем понятно что имеется в виду
Цитата:
table перешла запись на случайное число
Если переход на случайную запись, то необходимо, чтобы таблица имело числовой ключ (если не имеет, то создать), находить значение ключа случайным образом, и делать переход по Locate.
__________________
- Товарищ прапорщик!!! Остановите поезд!!! - Поезд СТОЙ! РАЗ! ДВА!

Последний раз редактировалось Viajero, 15.08.2011 в 16:00.
Ответить с цитированием
  #3  
Старый 15.08.2011, 16:04
marales marales вне форума
Прохожий
 
Регистрация: 04.08.2011
Сообщения: 13
Репутация: 10
По умолчанию

Это совсем не то. Задача простая. Мне нужен всего лишь код переход на случайную запись при нажатии кнопки на форме, при условии что бд подключена все табл. открыты просто в переменную записать номер текущей записи и перейти на случайную строчку таблицы
Код:
t1:= form3.ADOTable1.RecNo
Правильно я записал номер текущей записи в переменную или нет?
а как перейти на случайную запись?

Последний раз редактировалось marales, 15.08.2011 в 16:06.
Ответить с цитированием
  #4  
Старый 15.08.2011, 16:18
Аватар для Viajero
Viajero Viajero вне форума
Активный
 
Регистрация: 14.06.2011
Адрес: РБ
Сообщения: 214
Версия Delphi: Delphi 7 FB 2.5
Репутация: 5849
По умолчанию

RecNo это номер текущей позиции не в таблице а в датасете, и не для всех датасетов работает. В теории записи в реляционных таблицах не должны иметь никаких номеров, только ключи и индексы.
__________________
- Товарищ прапорщик!!! Остановите поезд!!! - Поезд СТОЙ! РАЗ! ДВА!

Последний раз редактировалось Viajero, 15.08.2011 в 16:20.
Ответить с цитированием
  #5  
Старый 16.08.2011, 06:53
Аватар для Ildar-tsr
Ildar-tsr Ildar-tsr вне форума
Местный
 
Регистрация: 09.08.2011
Адрес: г.Сургут, ХМАО
Сообщения: 453
Репутация: 7402
По умолчанию

Цитата:
Мне нужен всего лишь код переход на случайную запись при нажатии кнопки на форме

Можно попробовать следующее:

Код:
form3.ADOTable1.RecNo:= Random(form3.ADOTable1.RecordCount-1);
__________________
Google в помощь
Ответить с цитированием
  #6  
Старый 16.08.2011, 06:58
marales marales вне форума
Прохожий
 
Регистрация: 04.08.2011
Сообщения: 13
Репутация: 10
По умолчанию

Цитата:
Сообщение от Ildar-tsr
Можно попробовать следующее:

Код:
form3.ADOTable1.RecNo:= Random(form3.ADOTable1.RecordCount-1);
Спасибо то что надо! а почему -1?
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра
Комбинированный вид Комбинированный вид

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 09:00.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025