сделать кнопки не активными

← →
alikon1 (2007-10-08 13:21) [0]

procedure TForm1.BitBtn2Click(Sender: TObject);
begin
DBNavigator1.BtnClick(nbNext);
end;

Даже если дойти до конца базы, то кнопка все равно остается активной. А как ее сделать не активной, если запись уже последняя?

← →
Desdechado © (2007-10-08 13:32) [1]

Это ты видишь, что конец. А методу нужно попытаться еще раз, чтобы убедиться (поймать DataSet.EOF). Тогда он и сделает кнопки серыми.

← →
clickmaker © (2007-10-08 13:39) [2]

> alikon1 (08.10.07 13:21)

а зачем такой бутерброд? Одной кнопкой имитировать нажатие другой?
Не проще ли DataSet.Next?

← →
alikon1 (2007-10-08 13:42) [3]

И как можно узнать общее количество записей в БД?

Для Paradox

← →
Desdechado © (2007-10-08 13:47) [4]

SELECT Count(*) по всем таблицам и просуммировать

← →
alikon1 (2007-10-08 13:47) [5]

У DBNavigator"а вместо слов стрелки, а я со словами кнопки хотел

← →
clickmaker © (2007-10-08 13:48) [6]

select count(*) from table
для любой СУБД. Хоть у нас, хоть на Марсе

Есть еще RecordCount, но оно не всегда показывает полное количество, а для "мертвых" запросов может вобще быть -1

← →
alikon1 (2007-10-08 13:53) [7]

SELECT Count(*) - как комментарий считает
И с DataSet.Next можно подробнее, в универе задание дали, а как в Delphi работать и сам преподаватель не знает. Так что сижу сам пытаюсь разобраться.

← →
engine © (2007-10-08 13:54) [8]

> [5] alikon1 (08.10.07 13:47)

Кидаешь баттон на форму, меняешь ему кэпшион на слово «Впирет/Назат»
Жамкаешь мышой на кнопку и в процедуре ОнКлик пишешь
Table1.Next/Prior;

← →
korneley © (2007-10-08 13:54) [9]

> И как можно узнать общее количество записей в БД?Для Paradox
Table1.RecordCount. Причем работает только с Paradox + BDE

← →
clickmaker © (2007-10-08 13:55) [10]

> как в Delphi работать и сам преподаватель не знает

а что он преподает?

← →
alikon1 (2007-10-08 13:58) [11]

вообще то это ОНА, программирование преподает, хотя сама только начала изучать язык пару недель назад. Такие вот преподаватели в Казахстане бывают.

← →
alikon1 (2007-10-08 14:01) [12]

спасибо, количество записей вроде работает
label4.caption := inttostr(Table1.RecordCount);

а можно узнать, элемент под каким номером выделен в текущий момент (допустим в DBGrid)

← →
alikon1 (2007-10-08 14:05) [13]

Нашел команду, вроде то что надо выводит:
label4.caption := inttostr(table1.RecNo);

> alikon1 (08.10.2007 13:47:05) [5]

Выбрось DBNavigator совсем.

И RecordCount, и RecNo слишком скользкие.
Привычка их использовать потом вылазит боком.
Номер строки обычно не нужен, есть уникальный первичный ключ для этих целей.

> alikon1 (08.10.07 13:58)

а ты ее сюда приглашай... ;)

> а можно узнать, элемент под каким номером выделен в текущий
> момент (допустим в DBGrid)
Боюсь ошибиться, но опять же для Paradox + BDE, работает что-то типа Table1.CurrentRecord

> Desdechado © (08.10.07 15:38) [15]
> И RecordCount, и RecNo слишком скользкие
Полностью согласен. А на 95/98 в Paradox-е и персонале, который всегда "я правильно всё выключил" - постоянная головная боль с индексами, и это ещё счастье, пока не наступит полный "file corrupt" :)

сделать кнопки не активными Найти похожие ветки