Всем привет! Сначало немного болтавни (оффтоп), а потом будет по теме. Я долго пропадал, потому-что лежал долог в больнице. Короче вчера смотрел чутку голливудский фильм "Ловушка" реж. М. Найт Шьямалан. Как появится настроение, пересмотрю его см.

Недавно смотрел новый документальный фильм примерно снятый в 2023-2024 гг., на немецком про немецкую тюрьму:

Если не хотите весь документальный фильм смотреть, вот тайм-коды. Вот заключёный в немецкой тюрьме учиться электриком, он будет учиться 2 года см. https://youtu.be/A3kiq9HY7hU?t=344. Эта тюрьма расположена недалеко от жилых домов, т.е. рукой подать до свободы см. отсюда https://youtu.be/A3kiq9HY7hU?t=577 и отсюда см. https://youtu.be/A3kiq9HY7hU?t=2291. Это то что едят заключенные в немецкой тюрьме см. отсюда https://youtu.be/A3kiq9HY7hU?t=1097. Так-же заключённые в немецкой тюрьме смотрят DVD фильмы см. отсюда https://youtu.be/A3kiq9HY7hU?t=1710. Вот такую еду покупают заключёные в немецкой тюрьме см. https://youtu.be/A3kiq9HY7hU?t=1512.

В Алматы когда был маленьким ребёнком примерно в 5-10 лет, изучал и программировал на Turbo C 1.0, т.к. моему oтцу дали с работы компьютер, т.е. мой oтeц работал дома (удалёнка) ну или как сейчас это называют хоумофис. А в университете мы изучали язык программирования паскаль. Короче Когда приехал в Германию 01.04.2004 г., мы взяли компьютеры свои, мне мaть дала свой ноутбук Toshiba Satellite 100CS на ноутбуке был установлен Windows 95 и Microsoft Office 95 Professional, и я этим ноутбуком пользовался 1-е 6 месяцев в Германии, а один poдcтвенник программист дал мне в Германии свой диск, и на том диске было записано Turbo Pascal for Windows, и я учился программировать под Windows именно на Turbo Pascal for Windows. Среда разработки выглядела вот так:

Тут я уже обсуждал про современный Dev-C++ см. https://foren.germany.ru/1299414/f/40661211.html?Cat=&page..., тут я обсуждал про Си/Си++ см. https://programming.mybb.ru/viewforum.php?id=11. Мы будем играться в Dev-C++ его можно скачать тут см. https://www.bloodshed.net/ и программировать на Си, а не на Си++. Я поставил на Windows 2000 Dev-C++ 4.9.9.2. Вот так создавать новый проект в Dev-C++:

Простой пример:

#include <windows.h>

LRESULT CALLBACK WindowProcedure(HWND, UINT, WPARAM, LPARAM);
char szClassName[] = "WindowsApp";
int WINAPI WinMain(HINSTANCE hThisInstance,
                    HINSTANCE hPrevInstance,
                    LPSTR lpszArgument,
                    int nFunsterStil) {
    HWND hwnd;
    MSG messages;
    WNDCLASSEX wincl;
    wincl.hInstance = hThisInstance;
    wincl.lpszClassName = szClassName;
    wincl.lpfnWndProc = WindowProcedure;
    wincl.style = CS_DBLCLKS;
    wincl.cbSize = sizeof(WNDCLASSEX);
    wincl.hIcon = LoadIcon(NULL, IDI_APPLICATION);
    wincl.hIconSm = LoadIcon(NULL, IDI_APPLICATION);
    wincl.hCursor = LoadCursor(NULL, IDC_ARROW);
    wincl.lpszMenuName = NULL;
    wincl.cbClsExtra = 0;
    wincl.cbWndExtra = 0;
    wincl.hbrBackground = (HBRUSH)COLOR_BACKGROUND;

    if(!RegisterClassEx(&wincl))
        return 0;

    hwnd = CreateWindowEx(
           0,
           szClassName,
           "Windows App",
           WS_OVERLAPPEDWINDOW,
           CW_USEDEFAULT, CW_USEDEFAULT,
           544, 375,
           HWND_DESKTOP,
           NULL,
           hThisInstance,
           NULL
           );
    ShowWindow(hwnd, nFunsterStil);
    while(GetMessage(&messages, NULL, 0, 0)) {
        TranslateMessage(&messages);
        DispatchMessage(&messages);
    }
    return messages.wParam;
}

LRESULT CALLBACK WindowProcedure(HWND hwnd,
                                  UINT message,
                                  WPARAM wParam,
                                  LPARAM lParam) {
    switch(message) {
        case WM_DESTROY:
            PostQuitMessage(0);
        break;
        default:
            return DefWindowProc(hwnd, message, wParam, lParam);
    }
    return 0;
}

Результат работы программы:

Если я кому-то отвечаю, это не значит что я ему симпатизирую, каждый остаётся при своём мнение Дневник тяжелобольного инвалида