Текущий архив: 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.016 c