|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
08.10.2007, 13:23 | #1 |
Пользователь
Регистрация: 07.10.2007
Сообщений: 22
|
Активность кнопки в БД
procedure TForm1.BitBtn2Click(Sender: TObject);
begin DBNavigator1.BtnClick(nbNext); end; Даже если дойти до конца базы, то кнопка все равно остается активной. А как ее сделать не активной, если запись уже последняя? |
08.10.2007, 13:42 | #2 |
Пользователь
Регистрация: 07.10.2007
Сообщений: 22
|
И как можно узнать общее количество записей в БД?
Для Paradox |
08.10.2007, 13:51 | #3 |
*
Старожил
Регистрация: 22.11.2006
Сообщений: 9,201
|
В любом случае количество записей в таблице БД - например, Table.RecordCount. Просуммируем по всем таблицам - получим искомое.
Достаточно набрать в модуле имя существующего на форме компонента, поставить после него точку и ждать, когда вывалится список свойств, методов и т.д., присущих этому компоненту. (для ускорения сего процесса можно придержать SHIFT) И сразу куча вопросов отпадает... |
08.10.2007, 14:15 | #4 |
детский тренер
Форумчанин
Регистрация: 08.06.2007
Сообщений: 532
|
procedure TForm1.BitBtn1Click(Sender: TObject);
begin DBNavigator1.BtnClick(nbNext); if table1.eof=true then DBNavigator1.VisibleButtons:=[nbFirst,nbPrior,nbLast,nbInsert,nbD elete,nbEdit,nbPost,nbCancel,nbRefr esh]; end; тоесть не прописываешь в конце видимость кнопки nbNext
Я злой и страФный серррый воФк, и в пАрАсятах знаю толк - ppp ppp pp p pp pp
|
08.10.2007, 15:00 | #5 |
Пользователь
Регистрация: 07.10.2007
Сообщений: 22
|
if (Table1.RecordCount-1) = table1.RecNo then BitBtn2.Enabled:= false;
так сделал пока, вроде работает. "-1" добавил, чтоб 2 раза в конце не кликать по кнопке для деактивации, а сразу пропадает, как до конца доходит. А table1.eof=true надо запомнить, а то я пробовал table1=eof, соответственно ничего не работало. Спасибо. |
08.10.2007, 17:21 | #6 |
Старожил
Регистрация: 22.05.2007
Сообщений: 9,069
|
только учтите, что RecordCount не всегда правду говорит
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Паранормальная активность | Nemez | Операционные системы общие вопросы | 19 | 26.08.2008 14:45 |
UCOZ: Кнопки кнопки на изображении | ReDuX | HTML и CSS | 19 | 25.04.2008 02:39 |
Активность формы | BanDit | Общие вопросы Delphi | 2 | 27.12.2007 21:40 |
триггерные кнопки и кнопки переключатели в DELPHI | MARGO | Помощь студентам | 3 | 12.11.2007 17:35 |
Запуск приложения и активность формы | fuv | Win Api | 3 | 11.05.2007 20:30 |