Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Свойства файла [D7]


Elec3C ©   (2008-01-24 14:37:00) 

Окно "Cвойства" файла вызываю так:

procedure ProgInfo(const Path, FileName : String);
var SEI : _SHELLEXECUTEINFOA;
begin
 ZeroMemory(@SEI, SizeOf(_SHELLEXECUTEINFOA));

 with SEI do
  begin
    cbSize       := SizeOf(_SHELLEXECUTEINFOA);
    fMask        := SEE_MASK_INVOKEIDLIST;
    //Wnd         := Form.Handle;
    lpVerb       := 'Properties';
    lpFile        := PChar(FileName);
    lpDirectory := PChar(Path    );
  end;

 ShellExecuteEx(@SEI);
end;

Есть 2 вопроса:
1. Почему после вызова ProgInfo окно "Свойства" файла долго появляется(где-то появляется после секунд 3-5)? В Тотале, если вызываешь "Свойства" файла, окно появляется сразу после ~1 секунды.
2. Как отловить закрытие окна "Свойства" файла?

P.S. Может я что-то не так делаю?


Elec3C   (2008-01-24 21:21:00) [1]

Поторопился, блин. Последний вопрос: Если свойство окна StayOnTop в True и при этом вызвать свойства файла, то окно свойств файла будет позади окон программы.
Каким образом, можно поставить окно свойств файла "Поверх остальных окон"?


Elec3C   (2008-01-24 20:58:00) [2]

Всем спасибо. Ветка закрыта.


clickmaker   (2008-01-24 17:33:00) [3]


> [5] Elec3C ©   (24.01.08 15:32)

после изменения свойств файла?
ну отслеживай их тогда
FindFirstChangeNotification и иже с нею


Elec3C   (2008-01-24 16:24:00) [4]

Большая рутина, что-ли?


Palladin   (2008-01-24 15:34:00) [5]

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


Elec3C   (2008-01-24 15:32:00) [6]


> а зачем?

Ну мне нужно выполнить некоторые действия, именно, после закрытия окна.


Palladin   (2008-01-24 15:18:00) [7]

а зачем?


Elec3C   (2008-01-24 15:17:00) [8]

Хотя, нормально. Последний вопрос: Как отловить закрытие окна "Свойства" файла?


Elec3C   (2008-01-24 15:12:00) [9]

Всё равно как-то долговато появляется окно. А как отловить закрытие?


clickmaker   (2008-01-24 14:53:00) [10]

function SHObjectProperties(hWindow: HWND; dwType: DWORD; szObject: PWideChar; szPage: PWideChar): LongBool; stdcall; external 'shell32.dll';

const
 SHOP_FILEPATH = 2;

вызов

SHObjectProperties(Form.Handle, SHOP_FILEPATH, FileName, nil);


Наверх

Титульная страница Поиск, карта сайта Написать письмо