Проблема с GoBack, GoForward

[Dryg2009]

всем привет!!

Делаю что-то мини браузера!! только файлы буду открываться с локального диска!! Но это не важно!! у меня есть две кнопки вперед и назад само сабой использовал WebBrowser1.GoForward; и WebBrowser1.GoBack; но когда история пустая выдается ошибки!! как сделать чтобы их избежать!!
Да я не использовал элемент Button а взял MainMenu1 и там создал кнопку N2 и N3!!
пробывал вот это

procedure TForm1.WebBrowser1CommandStateChang e(Sender: TObject;
Command: Integer; Enable: WordBool);
begin
case Command of
CSC_NAVIGATEBACK: N2.Enabled := Enable;
CSC_NAVIGATEFORWARD: N3.Enabled :=Enable;
end;
end;

но не помогло!!

так же не помогло

try
WebBrowser1.GoBack;

..............

и так далее


помогите еще что-то придумать!!!

[Levsha100]

Ну, заведи переменку-счетчик и когда клацаешь на кнопку добавляй/уменьшай ее значение, а при вызове процедур(GoForward;GoBack делай проверку!

[Dryg2009]

а по падробнее!!

[Levsha100]

Можно завести две переменки!
В одной хранить макс длину истории, те при нажатии на кнопку "вперед" добавляем к этой переменной +1;
Другую увеличивать при нажатии на кнопку "вперед" и уменьшать при нажатии на кнопку "назад"!
Далее при нажатии на любую из этих кнопок осуществлять проверку принадлежности второй переменки первой!

[Dryg2009]

как история считывется как мне ее вытащить!! например i:integer
if i=0 then как дальше-то я чет не догнал!!

извени за offtop~~