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

← →
Aleksandr © (2002-10-16 15:47) [0]

Какие флаги надо указать при создании окна, чтобы оно было диалоговым (или без заголовка, или только с заголовком без кнопок)?

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);

← →
Игорь Шевченко © (2002-10-16 16:01) [1]

Изучить исходники Forms.pas и посмотреть, как создается окно при указании у формы BorderStyle = bsDialog

← →
Arcus © (2002-10-16 16:47) [2]

Попробуй
...,ws_Popup or ws_Border or ws_ThickFrame,...

← →
MrAngel © (2002-10-16 17:19) [3]

Кстати у меня не получалось сделать диалоговое окно в потоке (TThread)... окно всегда вызывалось не в модальном режиме...

← →
Suntechnic © (2002-10-16 18:04) [4]

>MrAngel © (16.10.02 17:19)
Это потому что модальные диалоговые окна на Win API создаются с помощью DialogBox.

Если так то как тогда вывести окно в модальном режиме и в потоке?
У меня было создано своё окно типа TForm...

Если у тебя было создано окно типа TForm, тогда ты ошибся разделом форума.

Не получается окно сделать диалоговым :( Найти похожие ветки