Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.12.12;
Скачать: CL | DM;

Вниз

Получить путь активного окна эксплорер а   Найти похожие ветки 

 
WaS ©   (2004-10-28 13:36) [0]

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


 
BiN ©   (2004-10-28 14:22) [1]

чтайте доки. они рулез

проход по открытым окнам Explorer-a:


var
 ShellObj:Variant;
 Wnds:Variant;
 L, i:Integer;
 IEObj:Variant;
begin
 Memo1.Lines.Clear;
 ShellObj:=CreateOleObject("Shell.Application");
 Wnds:=ShellObj.Windows;
 try
 L:=Wnds.Count;
 if L>0 then
 for i:=0 to L-1 do
 begin
   IEObj:=Wnds.Item(i);
   Memo1.Lines.Add(Format("%d. IE Window: %s  ::  %s", [i, IEObj.FullName, IEObj.LocationName, IEObj.LocationURL]));
   IEObj:=Null;
 end;
 finally
 Wnds:=Null;
 ShellObj:=Null;
 end;
end;


 
WaS ©   (2004-10-28 14:58) [2]

To BiN

Ууухх.. Огромное спасибо, не знал что бы без тебя делать!!! Усе ОК после некоторой лоработки кода.

P.S. Где доки, то кстати читать???

;)


 
WaS ©   (2004-10-28 14:58) [3]

To BiN

Ууухх.. Огромное спасибо, не знал что бы без тебя делал!!! Усе ОК после некоторой лоработки кода.

P.S. Где доки, то кстати читать???

;)


 
WaS ©   (2004-10-28 14:58) [4]

To BiN

Ууухх.. Огромное спасибо, не знал что бы без тебя делал!!! Усе ОК после некоторой лоработки кода.

P.S. Где доки, то кстати читать???

;)


 
WaS ©   (2004-10-28 14:59) [5]

To BiN

Ууухх.. Огромное спасибо, не знал что бы без тебя делал!!! Усе ОК после некоторой лоработки кода.

P.S. Где доки, то кстати читать???

;)


 
BiN ©   (2004-10-28 15:14) [6]

Где доки, то кстати читать???

все там же: http://www.msdn.com

http://msdn.microsoft.com/library/default.asp?url=/workshop/browser/webbrowser/reference/objects/internetexplorer.asp

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/shellcc/platform/shell/reference/objects/shell/shell.as p



Страницы: 1 вся ветка

Текущий архив: 2004.12.12;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.037 c
3-1100246020
Jann
2004-11-12 10:53
2004.12.12
даление строчки


6-1096747272
denkop
2004-10-03 00:01
2004.12.12
Передача структуры которая содержит поле типа pointer


1-1101712415
senator
2004-11-29 10:13
2004.12.12
Как преобразовать строку ANSI в Unicode


8-1094660317
AzIN
2004-09-08 20:18
2004.12.12
TMediaPlayer


3-1100111831
GanibalLector
2004-11-10 21:37
2004.12.12
UNION