Форум АНТИЧАТ - Dialog из ресурса

Форум АНТИЧАТ (https://forum.antichat.xyz/index.php)

- С/С++, C#, Delphi, .NET, Asm (https://forum.antichat.xyz/forumdisplay.php?f=24)

- - Dialog из ресурса (https://forum.antichat.xyz/showthread.php?t=81551)

Dialog из ресурса

Есть диалог запрятаный в файл .res как его вызвать через CreateDialog???
Либо как создать виндовыми средствами диалог с логином и паролем как за .htaccess?

используя DialogBoxParam, хоть язык написал бы

тфу ,забыл дельфи.

Объявляешь ресурсы в rc файле
brcc32 -32 -твой файл
в проекте вызывается DialogBox(hInstance, 'MAIN_WINDOW', 0, @DlgProc);

Сорец проекта написанного на чистом API в ссылке
среди рамки проекта:
1. чистый API
2. пример работы с плагинами
3. win32 GUI

ссылка: http://slil.ru/26072115

выглядит структура примерно так

Код:

program prog_name;

{$R res.res}

uses

  windows;

const

 WM_CLOSE=$0010;

 WM_COMMAND=$0111;

 BN_CLICKED=0;





function MainProc(wnd:dword; Msg : Integer; Wparam:dword; Lparam: dword): dword; stdcall;

begin

case msg of

 WM_CLOSE:exitprocess(0);

 WM_COMMAND:

  begin

   case Wparam of

    BN_CLICKED shl 16+3:myproc1();

    BN_CLICKED shl 16+2:myproc2();

    BN_CLICKED shl 16+1: // типа чтение из полей ввода

     begin

        GetWindowText(GetDlgItem(wnd,1002),host,255);

        GetWindowText(GetDlgItem(wnd,1003),path,255);

     end;

   end;

  end;

end;

exit;

end;





begin

DialogBoxParam(hinstance,'Dialog_1',HWND_DESKTOP,@MainProc,0);

end.