Вопрос № 52399: Здравствуйте уважаемые эксперты!
1)Как сделать в Делфи так чтобы в программе при нажтии клавиши ентр выплнялась операця Imag1.Click?
2)Почему на вкладке Pagecontrol Tab-ы не "воспринимают" Visible:=false;
Пишу в обject inspector...
Вопрос № 52.399
Здравствуйте уважаемые эксперты!
1)Как сделать в Делфи так чтобы в программе при нажтии клавиши ентр выплнялась операця Imag1.Click?
2)Почему на вкладке Pagecontrol Tab-ы не "воспринимают" Visible:=false;
Пишу в обject inspector Visible-false а в программе но как был виден так и остался.
3)Недавно я уже задавал вопрос, но до конца не понял:как работать с веббраузером1 чтобы когда нужно было открывать доп. окно он открывал другую вкладку с tab-om?
Всем спасибо!
Отправлен: 17.08.2006, 10:45
Вопрос задал: SA2006 (статус: Посетитель)
Всего ответов: 4 Мини-форум вопроса >>> (сообщений: 0)
Отвечает: Савенко Вадим Иванович
Здравствуйте, SA2006!
2. Для Tab-ов нужно использовать не Visible, а TabVisible.
Ответ отправил: Савенко Вадим Иванович (статус: 8-ой класс)
Ответ отправлен: 17.08.2006, 11:24
Отвечает: Ерёмин Андрей
Здравствуйте, SA2006!
1. Это делается примерно так:
procedure TForm1.Image1Click(Sender: TObject); begin ShowMessage('Image1Click'); end;
procedure TForm1.FormCreate(Sender: TObject); begin
Self.KeyPreview:=True; end;
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin if Key = VK_RETURN then Image1.OnClick(nil); end;
--------- Нет правила без исключений. Правило без исключений - исключение из правил.
Отвечает: Morgen_krsk
Здравствуйте, SA2006!
Для табов Visible относится по-моему к содержимому табов, чтобы бы не видим tab нужно использовать TabVisible.
Ответ отправил: Morgen_krsk (статус: 2-ой класс)
Ответ отправлен: 17.08.2006, 16:17
Отвечает: Сухомлин Кирилл Владимирович
Здравствуйте, SA2006!
На 1 и 2 вам уже ответили, поэтому остается только 3-ий вопрос.
WebBrowser в Delphi - это не совсем то же, что и обычный броузер. Несмотря на то, что программа у вас будет одна, на каждую закладу нужно будет создавать по новому компоненту TWebBrowser.
В приложении код процедуры, в котором ссылка открывается совсем в новом окне. Вам же надо вместо создания нового окна, создать новый TabSheet, а на нем - WebBrowser. Возможно, стоит заранее подготовить новый класс - сразу готовую закладку. И не забудьте правильно присвоить ppDisp значение: NewWebbrowser.DefaultDispatch;
* Код программы, выдержки из закона и т.п. дополнение к вопросу.
Эта информация будет отображена в аналогичном окне как есть.
Обратите внимание!
Вопрос будет отправлен всем экспертам данной рассылки!
Для того, чтобы отправить вопрос выбранным экспертам этой рассылки или
экспертам другой рассылки портала RusFAQ.ru, зайдите непосредственно на RusFAQ.ru.
Форма НЕ работает в почтовых программах The BAT! и MS Outlook (кроме версии 2003+)!
Чтобы отправить вопрос, откройте это письмо в браузере или зайдите на сайт RusFAQ.ru.