![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Доступ к рабочему столу [D3, D6, Win95/98, Win2k, WinXP]
PycUS © (2002-10-12 04:13:00)Однажды была прога, которая писала стиххи прямо на раб. столе.
Сейчас хочу сделать что-то подобное... подскажите как получить доступ , за пример особое спасибо!
Dm9 (2002-10-17 18:07:00) [1]То ли это бред, то ли я где-то читал, что вместо обоев на desktop можно поместить любую программу...
PycUS (2002-10-17 11:20:00) [2]Да... остается только two beer or not two beer
>Геннадий © (16.10.02 22:41)
>DivX способен выводить показываемый фильм на Рабочий стол. Причём >именно под значки.
Да у меня была видюха с TV-in она изображение с видика тоже ложила под значьки...
Геннадий (2002-10-16 22:41:00) [3]DivX способен выводить показываемый фильм на Рабочий стол. Причём именно под значки. Я не думаю, что он для каждого кадра создаёт графический файл, а затем выставляет его в качестве обоев стола. Он тогда бы ужасно тормозил.
Так вот - сделать так, значит, возможно. НО КАК ?
Dm9 (2002-10-16 15:59:00) [4]Тогда, наверное, только менять обои (если интересно, кину примерчик) - другого способа я не вижу
PycUS (2002-10-16 10:14:00) [5]>Dm9 (16.10.02 01:27)
Пример конечно неплохой, но опять таки просто как прозрачное окно
А надо положить его именно под иконки рабочего стола
Dm9 (2002-10-16 01:29:00) [6]Насчёт html-а на рабочем столе - интересная идея, но никак руки не доходят написать программу...
Dm9 (2002-10-16 01:27:00) [7]>Хотелось бы маленький примерчик
procedure TForm1.Button2Click(Sender: TObject);
var C : TCanvas;
begin
C := TCanvas.Create;
C.Handle := GetDC (0);
C.TextOut (100, 100, "Text");
C.Ellipse (200, 200, 300, 300);
C.Free;
end;
Только оно при перерисовке стирается.
PycUS (2002-10-16 00:02:00) [8]>Dr_Mike ©
>(посмотрите в хелпе Win SDK темы по List View Controls)
Покапался но ничего не нашел , можно простейший пример дальше сам докумекаю
Dr_Mike (2002-10-15 02:06:00) [9]Рисну повторить уже сказанное - рабочий стол - это List View по своей сути, так что достаточно получить его дескриптор, и рисуйте что хотите.
(посмотрите в хелпе Win SDK темы по List View Controls)
...а что касается упреков pirat"у, то просто человек по привычке Т в начале приписал ;-))
Геннадий (2002-10-14 19:34:00) [10]Этот пример создаёт надпись НАД Рабочим столом. И в TaskBare для него появляется иконка. Ему автоматически создаётся окно. А вот как эту надпись поместить ПОД иконки Рабочего стола и без иконки в Панели задач?
PVOzerski (2002-10-14 10:52:00) [11]>Кста, рабочий стол - это что? Это TListView
Сильно сказано! Неужели и правда Explorer написан с использованием VCL? :^) Увы, стандартные классы VCL тут использовать тяжко...
Извольте получить работающий (NT4) пример моего варианта:
procedure TForm1.Button1Click(Sender: TObject);
var
h:tHandle;
L:tStaticText;
begin
h:=GetDesktopWindow;
L:=tStaticText.Create(nil);
L.ParentWindow:=h;
L.Top:=100;
L.Left:=100;
L.Visible:=true;
L.Caption:="Hello Desktop!";
end;
REA (2002-10-14 10:26:00) [12]А есть ActiveDesktop и тогда стол - это HTML. Хм. Плугин наверно можно к эксплореру написать какой-то.
PycUS (2002-10-14 10:20:00) [13]Хотелось бы маленький примерчик
pirat (2002-10-12 11:45:00) [14]Я имею ввиду такую фичу что GetDC(0) вернет всю поверхность экрана,как если бы она былы самым верхним неперекрывающимся окном.
Кста, рабочий стол - это что? Это TListView. Следовательно мы можем выковырять его хэндл и рисовать на нем.
PVOzerski (2002-10-12 06:29:00) [15]>А может меня еще и winamp поучите запускать?
>А можно подвесить комп простым кулькулятором !
Сорри, но какой вопрос - такой ответ. BTW, вопрос о WinAmp звучал не вполне
бессмысленно, особенно в контексте самого 1-го (кто Вас знает, может, Вы что-то вроде
караоке с субтитрами по десктопу сделать хотите :^) ). Так что не надо обижаться (и за
флейм с DeMoN-777 тоже - в конце концов, отмести неудачное решение тоже небесполезно).
PycUS (2002-10-12 06:15:00) [16]А можно подвесить комп простым кулькулятором !
PVOzerski (2002-10-12 05:58:00) [17]2PycUS (12.10.02 05:43):
Посмотрите ShellExecute, CreateProcess... А может, WinAMP как OLE-сервер умеет работать?
PycUS (2002-10-12 05:43:00) [18]А может меня еще и winamp поучите запускать?
DeMoN-777 (2002-10-12 05:33:00) [19]>PVOzerski © (12.10.02 05:27)
Не знаю =)
Согласен что это изврат......
PVOzerski (2002-10-12 05:27:00) [20]2DeMoN-777:
А потом как добраться мышью до My Computer или Recycle? :^) Это из разряда приколов:
как сделать desktop ни на что не реагирующим. Или перенаправлять все сообщения, идущие на
Вашу форму, на DeskTop?