Автозаполнение

← →
Yanis © (2003-07-30 15:20) [0]

Пожалуйста подскажите как реализовать автозаполнение в своём собственном броузере. Что бы после его закрытия и загрузки при вводе адреса который уже вводился выпадала строка, короче всём понятно. Так же было бы неплохо узнать где хранится список автозаполнения IE. Спасибо.

← →
Yanis © (2003-07-30 15:39) [1]

Что никаких идей?

← →
Yanis © (2003-07-30 15:49) [2]

Пойду на Sources.ru, а то здесь не дождёшся пока какой-нибудь великий программист тебе подскажет, все зазнались.

← →
Anatoly Podgoretsky © (2003-07-30 16:08) [3]

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

← →
Yanis © (2003-07-30 16:13) [4]

Но я то не зазнался, если что знаю то обязательно помогаю. А ты т.е. вы только стебаться можете?

← →
ggsoft © (2003-07-30 16:30) [5]

А почему же сразу в "Потрепаться" вопрос - не такой уж треп..., хотя, конечно

> Yanis
ты gоторопилcя с выводами о "зазнались"... как мне кажется.
А тебе что трудно прочитать MSDN - SHAutoComplete() - самый простой путь, или IAutoComplete (IAutoComplete2)

interface function SHAutoComplete(hwndEdit: THandle; Flags: Cardinal): HRESULT; stdcall; implementation function SHAutoComplete; external "ShlWApi" name "SHAutoComplete";
перед использованием: CoInitialize(nil), после: CoUnInitialize

Вот:

unit WinAPI_SHAutoComplete; interface uses ActiveX; function SHAutoComplete(hwndEdit: THandle; Flags: Cardinal): HRESULT; stdcall; function EnableAutoComplete(Handle: THandle; FileSystem, URL: Boolean): Boolean; implementation function SHAutoComplete; external "ShlWApi" name "SHAutoComplete"; function EnableAutoComplete(Handle: THandle; FileSystem, URL: Boolean): Boolean; const SHACF_FILESYSTEM = $00000001; SHACF_URLHISTORY = $00000002; SHACF_URLMRU = $00000004; SHACF_USETAB = $00000008; const IFileSystem: array[Boolean] of Cardinal = (0, SHACF_FILESYSTEM); IURL: array[Boolean] of Cardinal = (0, SHACF_URLHISTORY or SHACF_URLMRU); var Flags: Cardinal; begin Result := False; Flags := IFileSystem[FileSystem] or IURL[URL]; if Flags <> 0 then begin Flags := Flags or SHACF_USETAB; Result := SHAutoComplete(Handle, Flags) = 0; end; initialization OleInitialize(nil); finalization ( FindWindowEx(ComboBox1.Handle,0,"Edit",nil) Вот: unit WinAPI_SHAutoComplete; interface uses ActiveX; function SHAutoComplete(hwndEdit: THandle; Flags: Cardinal): HRESULT; stdcall; function EnableAutoComplete(Handle: THandle; FileSystem, URL: Boolean): Boolean; implementation function SHAutoComplete; external "ShlWApi" name "SHAutoComplete"; function EnableAutoComplete(Handle: THandle; FileSystem, URL: Boolean): Boolean; const SHACF_FILESYSTEM = $00000001; SHACF_URLHISTORY = $00000002; SHACF_URLMRU = $00000004; SHACF_USETAB = $00000008; const IFileSystem: array[Boolean] of Cardinal = (0, SHACF_FILESYSTEM); IURL: array[Boolean] of Cardinal = (0, SHACF_URLHISTORY or SHACF_URLMRU); var Flags: Cardinal; begin Result := False; Flags := IFileSystem[FileSystem] or IURL[URL]; if Flags <> 0 then begin Flags := Flags or SHACF_USETAB; Result := SHAutoComplete(Handle, Flags) = 0; end; initialization OleInitialize(nil); finalization OleUninitialize; end; end. Для комбобокса: EnableAutoComplete(FindWindowEx(ComboBox1.Handle,0,"Edit",nil),False,True) работает в точности как на IE

Автозаполнение Найти похожие ветки