Текущий архив: 2003.11.24;
Скачать: CL | DM;
Вниз
Кнопка вперёд и назад, Twebbrowser Найти похожие ветки
← →
Aik (2003-11-12 10:39) [0]Люди, подскажите пожалуйста кто-нибудь, как избавиться от ошибки, которая возникает, если назад и вперёд перейти нельзя? То есть дошёл пользователь с помощью конопки "Назад" до самой первой страницы, а потом, нажимая её ещё раз, он видит сообщёение об ошибке.
← →
Плохиш_ (2003-11-12 10:41) [1]Отключить кнопку не поможет?
← →
Aik (2003-11-12 10:42) [2]а если она нужна?
← →
Saturn © (2003-11-12 10:46) [3]слелай проверку и если он на первой странице свяжы с кнопкой пустой код пусай кликает сколько хочет :)
← →
Плохиш_ (2003-11-12 10:46) [4]Ну тогда не выводи сообшение об ошибке
← →
Aik (2003-11-12 10:46) [5]дык понятно, а как эту проверку делать???
← →
Saturn © (2003-11-12 10:51) [6]Я ж не знаю какую именно прогу ты пишеш
← →
Aik (2003-11-12 11:08) [7]у мя прога. в ней twebbrowser и три кнопки: вперёд, назад и выход.
так фишка в чём. скажем, возьмём интернет эксплорер. там, кады переходить некуда, эти кнопки неактивны. а у меня активны. и ошибку выдают при нажатии на них...
Так как их неактивными делать?
← →
Saturn © (2003-11-12 11:39) [8]Создай хотя бы список со страницами которые открывались и если ты в начале или конце (это зависит от того что надо) списка то кнопку делаеш неактивной .
Или переменную введи если нажали вперед то +1 если назад то -1
а если 1 или 0 (все зависит от реализации) то кнопка назат неактивна.
чтото вроде такого тут надо чтобы твоя фантазия работала
← →
nikkie © (2003-11-12 11:58) [9]
procedure TForm1.WebBrowserCommandStateChange(Sender: TObject;
Command: Integer; Enable: WordBool);
begin
case Command of
CSC_NAVIGATEBACK:
FGoBackEnabled := Enable;
CSC_NAVIGATEFORWARD:
FGoForwardEnabled := Enable;
end;
end;
← →
Yanis © (2003-11-12 12:11) [10]try
...
except
...
end
← →
Aik (2003-11-13 15:01) [11]Не помогает.
Люди, как с условием if then else сделать?
А то код выше не работает.
← →
Eugene1501 © (2003-11-13 16:01) [12]В Delphi6 есть пример именно того что ты спрашиваешь.
← →
Aik (2003-11-14 08:17) [13]И как этот пример называется?
← →
alles55 (2003-11-14 12:28) [14]...\Delphi\Demos\CoolStuf
← →
alles55 (2003-11-14 12:28) [15]...\Delphi\Demos\CoolStuf
← →
alles55 (2003-11-14 12:28) [16]...\Delphi\Demos\CoolStuf
Страницы: 1 вся ветка
Текущий архив: 2003.11.24;
Скачать: CL | DM;
Память: 0.49 MB
Время: 0.018 c
