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

Вниз

Спрятать приложение из TaskBar а   Найти похожие ветки 

 
Осирис   (2002-11-11 17:42) [0]

Пробовал так:

ShowWindow(Application.Handle,SW_HIDE);

Не помогает. Что посоветуете ?


 
Anatoly Podgoretsky   (2002-11-11 17:44) [1]

Советую прятать не приложение, а главнцю форму


 
Marcus   (2002-11-11 17:44) [2]

Application.Initialize;
Application.ShowMainForm := false;
Application.Run;


 
Осирис   (2002-11-11 18:02) [3]

>> Application.ShowMainForm := false;

Не совсем то. Мне не нужно прятать форму, я хочу лишь убрать ее из TaskBar"а. Я поместил иконку в Tray и теперь хочу, чтобы приложение не висело в панели задач.


 
iNew   (2002-11-11 18:10) [4]

ShowWindow(Application.Handle,SW_HIDE);
Только что попробовал работает.


 
Осирис   (2002-11-11 18:14) [5]

Создал новое приложение. Пустое приложение. В onCreate формы поместил следующую строку:
ShowWindow(Application.Handle,SW_HIDE);

В TaskBar (это та полосочка внизу экрана, на которой отображаются все запущенные приложения - я ничего не путаю ?) висит Project1.

В чем может быть дело ?

Delphi7, Win2000 Server (SP2)


 
iNew   (2002-11-11 18:24) [6]

А ты попробуй в OnActivate или в OnShow.


 
LongIsland   (2002-11-11 18:46) [7]


> Осирис © (11.11.02 18:14)

Причем тут OnCreate? Это пишется в dpr


 
Осирис   (2002-11-11 18:54) [8]

>> А ты попробуй в OnActivate или в OnShow.

Да. Действительно - ты прав.

>> Причем тут OnCreate? Это пишется в dpr

Ты уверен. Пробовал - не работает.


 
LongIsland   (2002-11-11 18:57) [9]

program Project1;

uses
Forms,
Windows,
Unit1 in "Unit1.pas" {Form1};

{$R *.res}

var
WnHnd : Integer;
begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
WnHnd := GetWindowLong(Application.Handle, GWL_EXSTYLE);
if (WnHnd and WS_EX_TOOLWINDOW) = WS_EX_TOOLWINDOW then
WnHnd := WnHnd - WS_EX_TOOLWINDOW
else
WnHnd := WnHnd or WS_EX_TOOLWINDOW;
Application.MainForm.Hide;
SetWindowLong(Application.Handle, GWL_EXSTYLE, WnHnd);
Application.MainForm.Show;

Application.Run;
end.


 
Осирис   (2002-11-11 19:01) [10]

Спасибо. Полезная информация. Учту на будущее.


 
Song   (2002-11-11 20:53) [11]

>>В onCreate формы поместил следующую строку
В onCreate видимого окна ещё нет, чего ShowWindow() тебе будет скрывать?



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

Форум: "Основная";
Текущий архив: 2002.11.21;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.46 MB
Время: 0.007 c
6-69475
Ник Я
2002-09-24 15:48
2002.11.21
Хочу все время видеть на сколько загр. ОЗУ, может кто функцию зна


1-69390
Roman_Tutov
2002-11-10 13:06
2002.11.21
Многооконное приложение


4-69650
SergeBSL
2002-10-09 23:35
2002.11.21
Как переместить курсор в Edit-е чтобы выделенная часть не пропала


1-69433
b-Ars
2002-11-06 12:19
2002.11.21
Консоль


4-69633
DeCompiler
2002-10-10 18:51
2002.11.21
Цвет пикселя в закрытой части окна





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский