Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Delphi: ActiveX/СОМ/CORBA > webbrowser не работает setfocus?


Автор: s2004 27.10.2011, 17:56
Случайно пользуясь программкой с удивлением заметил что при её запуске невозможно сразу например набрать адрес в строке хоть в форме было прописано
Код

procedure TForm1.FormShow(Sender: TObject);
begin
 IEAddress1.SetFocus
 
end;



и ещё
Код

procedure TForm1.FormShow(Sender: TObject);
begin
if IEAddress1.CanFocus
 then IEAddress1.SetFocus
end;


так опять не помогло, то есть запускаю браузер и по идее
 как в том же iexplorere при его запуске пользователь незаморчивается, что надо подсветить строку адреса мышью, а сразу вводит нужный урл. тут же не так запуск программы, а строку адреса всё равно приходится подсвечиать. код то простой почему не работает?

Автор: s2004 29.10.2011, 16:36
вопрос решён практически методом тыка т.к. все oncreate, onshowe, onactive не сработали осталось только событие onpaint и всё прекрасно заработало

Код

procedure TForm1.FormPaint(Sender: TObject);
begin
   if IEAddress1.CanFocus
 then IEAddress1.SetFocus
end;


Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)