Кнопка на рабочем столе

← →
sesh (2004-09-02 10:26) [0]

Кто знает как поместить кнопку на рабочий стол?

← →
Алхимик © (2004-09-02 10:32) [1]

Можно нарисовать и в виде обоев на рабочий стол кинуть. :)
Либо HTML на рабочий стол положить.

← →
sesh (2004-09-02 10:39) [2]

Не, так не подходит :(

← →
Алхимик © (2004-09-02 11:57) [3]

> [2] sesh (02.09.04 10:39)
> Не, так не подходит :(

Кнопка на рабочем столе оказывается? Оказывается. Значит подходит.
Либо формулируй вопрос правильно.

Советую что - то на подобие этого :

Var
Win, Btn, DC : Cardinal;
PosX, PosY : Cardinal;
Const
PX = 100;
PY := 27;
begin
DC := GetDC(0);
Win := WindowFromDC(DC);
PosX := (GetSystemMetrics(SM_CXSCREEN) - PX) div 2;
PosY := (GetSystemMetrics(SM_CYSCREEN) - PY) div 2;
Btn := CreateWindowEx(0, "Button", "Caption", WS_VISIBLE or WS_PUSHLIKE, PosX, PosY, PX, PY, Win, 0, hInstance, nil);

///////

end;

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