Форум: "Сети";
Текущий архив: 2004.02.29;
Скачать: [xml.tar.bz2];
ВнизКак из InternetExplorer-а вытащить URL-адрес и заголовок окна? Найти похожие ветки
← →
killer (2003-11-14 15:25) [0]Как из активного окна InternetExplorer-а вытащить URL-адрес (из командной строки) и заголовок окна (где кнопочки "свернуть", "развернуть", "закрыть")?
← →
killer (2003-11-14 15:46) [1]Удалено модератором
Примечание: Создание пустых сообщений ...
← →
GH@ST (2003-11-14 16:17) [2]http://www.oligo.dk/iedelphi/
← →
Nikolay M. (2003-11-14 21:35) [3]
> Как из активного окна InternetExplorer-а вытащить URL-адрес
> (из командной строки)
А если поискать? На каждом углу, по-моему, валяется:
uses
windows, ddeman, ...
function Get_URL(Servicio: string): string;
var
Cliente_DDE: TDDEClientConv;
temp: PChar;
begin
Result := "";
Cliente_DDE:= TDDEClientConv.Create( nil );
with Cliente_DDE do
begin
SetLink( Servicio,"WWW_GetWindowInfo");
temp := RequestData("0xFFFFFFFF");
Result := StrPas(temp);
StrDispose(temp);
CloseLink;
end;
Cliente_DDE.Free;
end;
procedure TForm1.Button1Click(Sender);
begin
showmessage(Get_URL("Netscape"));
// или
showmessage(Get_URL("IExplore"));
end;
← →
Japan (2003-12-24 02:19) [4]А как узнать, когда был новый урл загружен?
Страницы: 1 вся ветка
Форум: "Сети";
Текущий архив: 2004.02.29;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.01 c