Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "WinAPI";
Текущий архив: 2005.08.14;
Скачать: [xml.tar.bz2];

Вниз

Очистить Рабочий стол   Найти похожие ветки 

 
AndreyProg   (2005-06-14 17:25) [0]

Мне нужно убрать все ярлыки, панели, обои. И сделать задний фон однотонным (например, черным или серым).


 
Zeqfreed ©   (2005-06-14 17:53) [1]

AndreyProg   (14.06.05 17:25)
К выполнению задания разрешаю приступить!

p.s. извини, не удержался)


 
nes ©   (2005-06-14 21:31) [2]

Глупо как-то,шугать юзера хочешь? :p
1)Прячем taskbar:
ShowWindow(FindWindow("Shell_TrayWnd", nil), sw_hide);

2)Прячем иконки:
var
hw:HWND;
begin
hw := FindWindow("ProgMan", nil);
hw := GetWindow(hw, GW_CHILD);
showwindow(hw,sw_hide);


 
Nes ©   (2005-06-14 21:37) [3]

Забыл=) фон:

procedure TForm1.Button1Click(Sender: TObject);
var
bmp:Tbitmap;
a,b:Integer;
s:string;
begin
s:="c:\123.bmp";
bmp:=Tbitmap.Create;
bmp.Width:=screen.width;
bmp.Height:=screen.Height;
for a:=0 to bmp.Width do begin
 for b:=0 to bmp.Height do
   bmp.Canvas.Pixels[a,b]:=clred;
   end;
bmp.SaveToFile(s);
SystemParametersInfo(SPI_SETDESKWALLPAPER, 0, @S[1],
   SPIF_UPDATEINIFILE OR SPIF_SENDWININICHANGE);
end;


 
AndreyProg   (2005-06-15 17:57) [4]


> Nes ©   (14.06.05 21:37) [3]

Какой-то дубовый метод (с битмапом).

Я хочу вот что:
1) запомнить текущие обои и свойство: экран - оформление-элемент рабочий стол : цвет1
2) очистить экран (свойства: экран-фон: Нет, экран - оформление-элемент рабочий стол : цвет2)
3) вернуть значения, запомненные в 1)


 
Deka ©   (2005-06-16 11:53) [5]

Может поместить на экран окошко залитое нужным тебе цветом? Без заголовка естественно.



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

Форум: "WinAPI";
Текущий архив: 2005.08.14;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.015 c
14-1121933194
SoftX
2005-07-21 12:06
2005.08.14
Астрология как историко-культурный феномен. Диссертация.


11-1105356483
RA
2005-01-10 14:28
2005.08.14
Изменения в PStrList


3-1120648451
WG
2005-07-06 15:14
2005.08.14
Delphi + SQL server - сориентируйте чайника


3-1120498485
Skull
2005-07-04 21:34
2005.08.14
Проблема запуска проги CBuilder6.0 + Access на CD


3-1120550318
mariya_mezenceva
2005-07-05 11:58
2005.08.14
языковой драйвер для Paradox 4.0





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский