Как совсем скрыть форму?
Для того, чтобы скрыть форму, используйте функцию ShowWindow:
ShowWindow(Handle, SW_HIDE);Можно еще задать форме позицию, при которой она не будет отображаться на мониторе:
Form1.Left:=-10000;В итоге получится как-то так:
procedure TForm1.OnActivate(Sender: TObject); begin Form1.Left:=-10000; //чтобы прога не мерцала при запуске ShowWindow(Handle, SW_HIDE); end;Вот и всё, Удачи!
Добавил(а): ДимаДК | Дата: 2013-11-28 | |
Хочу сделать небольшое замечание: ShowWindow(Handle, SW_HIDE); скрывает и форму и значок в панели задач, Form1.Left:=-10000; - скрывает только форму но в панели задач значок висит, а чтобы только скрыть значок можно использовать такой код:
var
CurStyle: Integer;
begin
CurStyle := GetWindowLong(Handle, GWL_EXSTYLE);
CurStyle := (CurStyle or WS_EX_TOOLWINDOW) and (not WS_EX_APPWINDOW);
SetWindowLong(Handle, GWL_EXSTYLE, CurStyle);
end;
|
Добавил(а): Denismen | Дата: 2014-01-25 | |
Все там верно. Не нужно ничего исправлять.
|
[url=https://echographie-sans-frontieres.com/blog-post/interview-journal-matin/#comment-13065]Everything about drugs.[/url] [url=https://filmshalatv.com/post/2198]Actual what you want to know about drugs.[/url] [url=http://beatricehoward.com/cayman-naib-is-missing-part-ii-the-parents-alec-and-some-amazing-people/#comment-434740]Everything information about medicines.[/url] 5703055