Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Не получается окно сделать диалоговым :( [D6, WinXP]

Aleksandr © (2002-10-16 15:47:00)
Какие флаги надо указать при создании окна, чтобы оно было диалоговым (или без заголовка, или только с заголовком без кнопок)?

wc.cbSize:=sizeof(wc);
wc.style:=cs_hredraw or cs_vredraw OR CS_NOCLOSE;
wc.lpfnWndProc:=@WindowProc;
wc.cbClsExtra:=0;
wc.cbWndExtra:=0;
wc.hInstance:=HInstance;
wc.hIcon:=0;
wc.hCursor:=0;
wc.hbrBackground:=COLOR_CAPTIONTEXT+1;
wc.lpszMenuName:=nil;
wc.lpszClassName:="WaitForm";
RegisterClassEx(wc);
WaitFormHandle:=CreateWindowEx(0, "WaitForm", PChar(r_AppTitle),
ws_overlappedwindow OR WS_DLGFRAME or WS_BORDER,
aLeft,aTop,aWidth,aHeight, MainHandle, 0, Hinstance, nil);
ShowWindow(WaitFormHandle,SW_SHOWDEFAULT);

Suntechnic (2002-10-16 19:10:00) [1]
Если у тебя было создано окно типа TForm, тогда ты ошибся разделом форума.

MrAngel (2002-10-16 18:09:00) [2]
Если так то как тогда вывести окно в модальном режиме и в потоке?
У меня было создано своё окно типа TForm...

Suntechnic (2002-10-16 18:04:00) [3]
>MrAngel © (16.10.02 17:19)
Это потому что модальные диалоговые окна на Win API создаются с помощью DialogBox.

MrAngel (2002-10-16 17:19:00) [4]
Кстати у меня не получалось сделать диалоговое окно в потоке (TThread)... окно всегда вызывалось не в модальном режиме...

Arcus (2002-10-16 16:47:00) [5]
Попробуй
...,ws_Popup or ws_Border or ws_ThickFrame,...

Игорь Шевченко (2002-10-16 16:01:00) [6]
Изучить исходники Forms.pas и посмотреть, как создается окно при указании у формы BorderStyle = bsDialog

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »