V_m

Тема в разделе "Delphi - Система", создана пользователем Spoiler, 4 авг 2005.

Статус темы:
Закрыта.
  1. Spoiler

    Spoiler Гость

    Привет всем.

    Пишу программу на дельфи и возникли следующие вопросы большая просьба помочь
    или киньте ссылочку где можно об этом почитать

    1. нужно что бы форма была как фон рабочего стола ( т.е. на заднем плане ), открываемые папки, софт и т.п. были всегда поверх моей формы.
    2. по какому адресу в реестре винды прописывается путь в котором указывается загружаемый шел для загрузки
     
  2. Spoiler

    Spoiler Гость

    народ дайте хотябы ссылки на доку, время ж идет
     
  3. Barmutik

    Barmutik Гость

    Никогда не сталкивался с задачей что б прорамма всегда была позади всех окон...

    Насчёт второго пункта не совсем понятно что подразумевается под "шелом для загрузки"?
     
  4. Spoler

    Spoler Гость

    В качестве оболочки ( shell ) explorer.exe
     
  5. Barmutik

    Barmutik Гость

    Извините, очень специфичная область... ничем не смогу помочь ..

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

    Может имеет смысл покопать в сторону Active Desktop и в стривания туда своих объектов?
     
  6. zubr

    zubr Гость

    Для NT-систем: HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon параметр SHELL
    Для Win9x в файле System.ini в ключе [boot] параметр Shell
     
  7. Poseidon

    Poseidon Гость

    <!--QuoteBegin-Barmutik+5:08:2005, 15:17 -->
    <span class="vbquote">(Barmutik @ 5:08:2005, 15:17 )</span><!--QuoteEBegin-->Насчётсоздания окна которое всегда на заднем плане.. как таковое я думаю окно создать не возможно .. нет стиля окна, который позволяет такое делать...
    [snapback]23016" rel="nofollow" target="_blank[/snapback]​
    [/quote] Нет ничего невозможного!

    <!--QuoteBegin-Spoiler+4:08:2005, 15:46 -->
    <span class="vbquote">(Spoiler @ 4:08:2005, 15:46 )</span><!--QuoteEBegin-->1. нужно что бы форма была как фон рабочего стола ( т.е. на заднем плане ), открываемые папки, софт и т.п. были всегда поверх моей формы.
    [snapback]22953" rel="nofollow" target="_blank[/snapback]​
    [/quote]
    Код (Text):
    protected
    procedure CreateParams(var Params: TCreateParams); override;

    //...

    procedure TForm.CreateParams(var Params: TCreateParams);
    begin
    inherited CreateParams(Params);
    if Assigned(Application.MainForm) then
    begin
     Params.WndParent := GetDesktopWindow;
     Params.Style := WS_CHILD;
    end;
    end;
     
  8. Barmutik

    Barmutik Гость

    Хорошее решение!
     
  9. mike.dld

    mike.dld Гость

    Насколько я помню, можно обрабатывать WM_WINDOWPOSCHANGING, устанавливая PWINDOWPOS(lParam)^.hwndInsertAfter = HWND_BOTTOM
     
Статус темы:
Закрыта.

Поделиться этой страницей