Starina
|
 Posted: Thu Nov 08, 2007 16:54 Post subject: |
 |
|
1) может придумать другое построение временных папок?
2) Английская статья с небольшим примером:
http://www.delphidabbler.com/articles?article=18
Также нашел компонент, которых этот интерфейс реализует EmbeddedWB:
http://www.bsalsa.com/
И вот как можно использовать метод:
| Code: |
type
TCustomizedWebBrowser = class(TWebBrowser, IDocHostUIHandler)
...
function TCustomizedWebBrowser.TranslateAccelerator(const lpMsg: PMSG;
const pguidCmdGroup: PGUID; const nCmdID: DWORD): HRESULT;
begin
Result := S_FALSE;
with lpMsg^ do
if (message = WM_KEYDOWN) and (GetKeyState(VK_CONTROL) >= 0) then
begin
MessageDlg(Char(wParam), mtWarning, [mbOK], 0);
Result := S_OK;
end
end;
|
Пока все, что смог. |
|
Rules
Search
FAQ
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
