браузер

← →
Mikishanya © (2012-09-22 16:39) [0]

Привет всем!

Подскажите, кто может. Как сделать так чтоб на вебстраничках в дельфи браузере (например в яндексе, кнопку "найти") можно былоб нажать enter"ом.
И еще. Как сделать сохранялку паролей, как в опере или мозиле?

Спасибо!

← →
AV © (2012-09-22 17:15) [1]

http://delphimaster.net/view/15-1348084386/

← →
QAZ2 (2012-09-22 22:57) [2]

> как в опере или мозиле?

а почему не как в ИЕ?

← →
Mikishanya © (2012-09-25 08:42) [3]

> а почему не как в ИЕ?

Ну потому что сам пользуюсь оперой и мозилой:)))

← →
Mikishanya © (2012-09-25 08:48) [4]

С сохранялкой пароля разобрался путем автозаполнения полей. Большего не надо.

Но вот чтоб на веб страничке, когда выделен элемент управления(кнопка "найти" в том же яндексе к примеру) клавишой ввод не получается его нажать. Вот ненаю чего для этого надо.

← →
AV © (2012-09-25 09:19) [5]

> клавишой ввод не получается его нажать. Вот ненаю чего для
> этого надо.
>

код написать?
если нажали клавишой ввод, то нажать как в примере [1]

← →
QAZ2 (2012-09-25 11:34) [6]

> Mikishanya © (25.09.12 08:42) [3]

а ты в курсе что "дельфи браузер" это ИЕ

← →
Mikishanya © (2012-09-25 13:14) [7]

> а ты в курсе что "дельфи браузер" это ИЕ

Спасибо просветил блин.... Реальную помощь можно оказать, а не язвить?
> код написать?если нажали клавишой ввод, то нажать как в
> примере

А тебе реальное спасибо! Почти догнал как делать:))

← →
Inovet © (2012-09-25 13:25) [8]

> [7] Mikishanya © (25.09.12 13:14)
> Реальную помощь можно оказать, а не язвить?

Где язвление?

← →
Mikishanya © (2012-09-25 14:21) [9]

> Где язвление?

Не хочу ругаться. Каждый понял по своему значит...

← →
QAZ2 (2012-09-25 15:17) [10]

я больше чем уверен, что как пользователь оперы, ты готов с пеной у рта любому доказывать что ИЕ полный отстой
но при этом для своей программы аля "смотрите какой я крутой прогер-написал свой браузер" используеш именно его
правда забавно...

← →
Mikishanya © (2012-09-26 08:01) [11]

← →
Mikishanya © (2012-09-26 08:19) [12]

> я больше чем уверен, что как пользователь оперы, ты готов
> с пеной у рта любому доказывать что ИЕ полный отстойно при
> этом для своей программы аля "смотрите какой я крутой прогер-
> написал свой браузер" используеш именно егоправда забавно.
> ..

Я работу хочу себе упростить, а не выпендриваться перед кем-то! А про IE сказать ничего не могу, потому что просто не пользовалься.
Еще раз повторю, я прошу помощи и совета, а не разные мнения непонятно кого обо мне!

← →
QAZ2 (2012-09-26 17:08) [13]

двоечник...

unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, OleCtrls, SHDocVw, StdCtrls,ActiveX; type TForm1 = class(TForm) WebBrowser1: TWebBrowser; procedure FormDestroy(Sender: TObject); procedure FormCreate(Sender: TObject); private { Private declarations } FOleInPlaceActiveObject: IOleInPlaceActiveObject; procedure MsgHandler(var Msg: TMsg; var Handled: Boolean); public { Public declarations } end; var Form1: TForm1; implementation {$R *.dfm} procedure TForm1.FormDestroy(Sender: TObject); begin FOleInPlaceActiveObject := nil; end; procedure TForm1.FormCreate(Sender: TObject); begin Application.OnMessage := MsgHandler; WebBrowser1.Navigate("www.yandex.ru"); end; procedure TForm1.MsgHandler(var Msg: TMsg; var Handled: Boolean); var iOIPAO: IOleInPlaceActiveObject; Dispatch: IDispatch; begin if not Assigned(WebBrowser1) then begin Handled := False; Exit; end; Handled := IsDialogMessage(WebBrowser1.Handle, Msg) = True; if (Handled) and (not WebBrowser1.Busy) then begin if FOleInPlaceActiveObject = nil then begin Dispatch := WebBrowser1.Application; if Dispatch <> nil then begin Dispatch.QueryInterface(IOleInPlaceActiveObject, iOIPAO); if iOIPAO <> nil then FOleInPlaceActiveObject := iOIPAO; end; end; if FOleInPlaceActiveObject <> nil then if ((Msg.message = WM_KEYDOWN) or (Msg.message = WM_KEYUP)) and (not (Msg.wParam in [VK_BACK,VK_LEFT,VK_RIGHT])) then FOleInPlaceActiveObject.TranslateAccelerator(Msg); end; end; end.

← →
Anatoly Podgoretsky © (2012-09-26 18:32) [14]

А где тут крутая Опера?

← →
QAZ2 (2012-09-26 21:30) [15]

ты про чо?

← →
Mikishanya © (2012-09-27 07:33) [16]

> двоечник...

Пасибо! Я не двоечник, я с дельфи знакомиться только начал:) Вообще кодить не учили нигде.. другое образование.

← →
Mikishanya © (2012-09-27 07:37) [17]

> А где тут крутая Опера?

Мне не нужна была крутая опера. Мне нужно было, чтоб как в опере на элементах упр. вебстраниц посылалась клавиша "ввод".

← →
Anatoly Podgoretsky © (2012-09-27 08:56) [18]

> Mikishanya (27.09.2012 07:37:17) [17]

Думаю что в опере не так, это же смерть

← →
QAZ2 (2012-09-27 10:51) [19]

> Пасибо!

на самом деле это говнокод из гугла и он улучшаем

Всем огромное спасибо за помощь! Приложение работает. Заморачиваться с enter"ом не стал, пользуюсь пробелом:))) Теперь затраты времени и сил сократились в трое:)

Народ. Вопрос не по теме, но коли создал, новую создавать не буду.

Есть прога(не моя). Есть на ней компоненты TcxCustomInnerTextEdit.
HWND их знаю. Имени у них не кажет, только класс.

Мне нужно из них выцепить текст к себе. пробовал GetWindowText по HWND сделать, не получается.
Зато получается в них самих текст менять по HWND.

Можно выцепить текст зная HWND?

> но коли создал, новую создавать не буду.
темы не персонализация по юзеру дельфимастера, а персонализация по вопросу...

т.ч. за оффтопик тебя нужно бы закрыть...

Закрывайте, если угодно. Не обижусь. Форум темами засорять не хочется.

А вообще все это связано между собой. Мне нужно чтоб из проги где эти TcxCustomInnerTextEdit заполнялись поля в webbrowser. Но это я в принципе подозреваю как сделать, если смогу выцепить текст с этих самых TcxCustomInnerTextEdit...

Что за люди... Ну ответьте по существу или примите меры (если модер) и баньте.
А коли сказать по вопросу нечего, так заткните рты.

Я по моему не просил "Народ, пофлудите тут, а?" или "Расскажите мне пожалуйста тут правила форума"....

есть 2 мысли

1.
если, конечно, это правда
> Зато получается в них самих текст менять по HWND.

что они выводят текст как-то иначе, и его не возьмешь по GetWindowText

2.
посмотри EnumChildWindow, получи все окна программы и проверь, нет ли нужного текста на уровень выше-ниже/левее-правее :).

ps
и не хами :)

> посмотри EnumChildWindow, получи все окна программы и проверь,
> нет ли нужного текста на уровень выше-ниже/левее-правее
> :).

пасиб, попробую

браузер Найти похожие ветки