|
|
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#2
05.03.2013, 14:46
|
||||
|
||||
Можно в юните завести глобальную переменную, а в процедуре жима кнопок записывать в неё метку
Код:
... var Bpess: integer; ... procedure TForm1.BitBtn2Click(Sender: TObject); begin Bpess:= 2; end; Код:
... if Bpress = 2 then WebBrowser1.Navigate(WideString(GetCurrentDir())+'/lab/' + TreeView1.Selected.Text+'.mht'); ... |
Древовидный вид