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

Control на рабочем столе   Найти похожие ветки 

← →
Rommel ©   (2006-01-06 23:57) [0]

Как поместиить Сомпанент или форму на рабочий стол вместе с иконками

---

← →
alex-drob ©   (2006-01-07 00:15) [1]

setparent

---

← →
Vovik   (2006-01-09 20:33) [2]

Приготовление:
Сначала устанавливаешь Left и Top компонента, которые
будут у него на десктопе.

1) Получаешь хендл десктопа (windows.GetDesktopWindow)
                                              ||
2) <компонент>.SetParent ( этот  V  хендл  )

                   *** ПРИМЕЧАНИЕ ***
Обработчики событий для этого компонента вроде бы

                      Т Е Р Я Ю Т С Я !

---

← →
jack128 ©   (2006-01-10 00:28) [3]

alex-drob ©   (07.01.06 0:15) [1]
Remarks

An application can use the SetParent function to set the parent window of a pop-up, overlapped, or child window. The new parent window and the child window must belong to the same application.

---

← →
Ivan_123   (2006-01-10 02:24) [4]

function GetDesktopListViewHandle: THandle;
var
 S: string;
begin
 Result := FindWindow("ProgMan", nil);
 Result := GetWindow(Result, GW_CHILD);
 Result := GetWindow(Result, GW_CHILD);
 SetLength(S, 40);
 GetClassName(Result, PChar(S), 39);
 if PChar(S) <> "SysListView32" then
   Result := 0;
end;

//--------------------------------------------
//используем WinAPI а не метод контрола и всё работает
SetParent(Form1.handle,GetDesktopListViewHandle)

---

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

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



Память: 0.45 MB
Время: 0.023 c