Скачать: CL | DM;

Свойства файла   Найти похожие ветки 

← →
Elec3C ©   (2008-01-24 14:37) [0]

Окно "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. Может я что-то не так делаю?

---

← →
clickmaker ©   (2008-01-24 14:53) [1]

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);

---

← →
Elec3C ©   (2008-01-24 15:12) [2]

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

---

← →
Elec3C ©   (2008-01-24 15:17) [3]

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

---

← →
Palladin ©   (2008-01-24 15:18) [4]

а зачем?

---

← →
Elec3C ©   (2008-01-24 15:32) [5]

> а зачем?

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

---

← →
Palladin ©   (2008-01-24 15:34) [6]

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

---

← →
Elec3C ©   (2008-01-24 16:24) [7]

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

---

← →
clickmaker ©   (2008-01-24 17:33) [8]

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

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

---

← →
Elec3C ©   (2008-01-24 20:58) [9]

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

---

← →
Elec3C ©   (2008-01-24 21:21) [10]

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

---

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

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.011 c