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

Вниз

Как скрыть кнопку на панели задач у вторичной формы, если для ней   Найти похожие ветки 

 
gear   (2006-08-24 15:53) [0]

Как скрыть кнопку на панели задач у вторичной формы, если для ней выставлено:

procedure TForm7.CreateParams(var Params: TCreateParams);
begin
 inherited;
  Params.WndParent := GetDesktopWindow;
end;


ShowWindow(self.Handle, sw_Hide); не помогает;


 
Palladin ©   (2006-08-25 10:43) [1]

Ну например, самое простое, так...

procedure TForm7.FormCreate(Sender: TObject);
begin
m_isHided:=False;
end;

procedure TForm7.FormActivate(Sender: TObject);
begin
If Not m_isHided Then
 Begin
  m_isHided:=True;
  ShowWindow(Handle,SW_HIDE);
 End;
end;


 
gear   (2006-08-25 20:33) [2]

нет этот вариант нерабочий :(


 
Fay ©   (2006-08-25 22:07) [3]

2 gear   (25.08.06 20:33) [2]
Я правильно понимаю, проблема в отображении кнопок закрытых, но не разрушенных форм?


 
Palladin ©   (2006-08-26 00:10) [4]

У меня он вполне рабочий.


 
Fay ©   (2006-08-26 01:52) [5]

2 Palladin ©   (26.08.06 0:10) [4]
> У меня он вполне рабочий.
М.б. потому, что правильно применяется m_isHided...


 
gear   (2006-08-26 14:46) [6]

m_isHided я объявил глобальной переменной boolean
всё остальное сделал так как написано.
Может это как то связано с тем, что Form7 создаётся динамически из Form1?
Application.CreateForm(TForm7, Form7);

Дело в том, что Form7 к Form1 после его создания (кликаю или выполняю какие-то действия с Form7, и Form1 тоже передаётся фокус, что не приемлимо). При такой схеме кнопки на таскбаре нет.

Вот это:
procedure TForm7.CreateParams(var Params: TCreateParams);
begin
inherited;
 Params.WndParent := GetDesktopWindow;
end;
отвязывает Form7 от Form1, но добавляет кнопку на таскбар.
При этом ниезнаю как от этой кнопки избавиться.


 
Fay ©   (2006-08-26 16:24) [7]

2 gear   (26.08.06 14:46) [6]
> Дело в том, что Form7 к Form1 после его создания
Не понял
> кликаю или выполняю какие-то действия с Form7, и Form1 тоже передаётся фокус
Нихрена не понял

> отвязывает Form7 от Form1
Чё?

> При этом ниезнаю как от этой кнопки избавиться
сдохнет вместе с экземпляром TForm7.

Скажи по-русски (важно!), кнопка на таскбаре - просто вредный побочный эффект, т.е. она тебе совсем не нужна?


 
gear   (2006-08-28 02:31) [8]

да, он мне не нужна.


 
Fay ©   (2006-08-28 02:35) [9]

2 gear   (28.08.06 2:31) [8]
Если не секрет, для чего перекрыта CreateParams? Зачем меняем WndParent?


 
gear   (2006-08-28 21:52) [10]

когда я кликаю на шапке Form7 на кнопке закрытия, главной форме Form1 передаётся фокус и она всплывает поверх остальных окон рядом. Этого не нужно.
Если я перекрываю CreateParams и делаю окну Form7 Params.WndParent := GetDesktopWindow, то при закрытии Form7 главное окно не всплывает поверх других окон.



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

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

Наверх





Память: 0.47 MB
Время: 0.068 c
2-1158227996
worldmen
2006-09-14 13:59
2006.10.08
Вставить текст в другую программу.


2-1158321256
DmiSb
2006-09-15 15:54
2006.10.08
Как узнать какое поля ввода потеряло фокус ?


15-1158127245
Rouse_
2006-09-13 10:00
2006.10.08
Интернет входит в правовые рамки.


2-1158324899
svt
2006-09-15 16:54
2006.10.08
Подскажите пожайлусата как связаять


6-1147572005
Delphi5.01
2006-05-14 06:00
2006.10.08
Работа с cookie в компоненте TWebBrowser (считывание, учтановка)





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