Вопросы от новичка

[БалаШагаЛ]

Всем привет и здравствуйте. Вчера начал изучать WinApi, дошёл до примера исходного кода, переписал его к себе в компилятор. Вот код:

#include "windows.h"

LRESULT CALLBACK DCDemoWndProc(HWND,UINT,UINT,LONG);

int WINAPI WinMain(HINSTANCE hInstance,HINSTANCE hPrevInstance,LPSTR lpszCmdParam,int nCmdShow)
{
    HWND hWnd;
    WNDCLASS WndClass;
    MSG Msg;
    char szClassName[]="DCDemo";
    WndClass.style=CS_HREDRAW|CS_VREDRAW;
    WndClass.lpfnWndProc=DCDemoWndProc;
    WndClass.cbClsExtra=0;
    WndClass.cbWndExtra=0;
    WndClass.hInstance=hInstance;
    WndClass.hIcon=LoadIcon(NULL,IDI_APPLICATION);
    WndClass.hCursor=LoadCursor(NULL,IDC_ARROW);
    WndClass.hbrBackground=(HBRUSH)(WHITE_BRUSH);
    WndClass.lpszMenuName="MyMenu";
    WndClass.lpszClassName=szClassName;
    if (!RegisterClass(&WndClass))
    {
        MessageBox(NULL,"Cannot register class","Error",MB_OK);
        return 0;
    }
    hWnd=CreateWindow(szClassName,"Program No 1",WS_OVERLAPPEDWINDOW,
                                 CW_USEDEFAULT,CW_USEDEFAULT,CW_USEDEFAULT,
                                 CW_USEDEFAULT,NULL,NULL,hInstance,NULL);
    if (!hWnd)
    {
        MessageBox(NULL,"Cannot create window","Error",MB_OK);
        return 0;
    }
    ShowWindow(hWnd,nCmdShow);
    UpdateWindow(hWnd);
    while(GetMessage(&Msg,NULL,0,0))
    {
        TranslateMessage(&Msg);
        DispatchMessage(&Msg);
    }
    return Msg.wParam;
}

LRESULT CALLBACK DCDemoWndProc(HWND hWnd,UINT Message,UINT wParam,LONG lParam)
{
    HDC hDC,hCompatibleDC;
    PAINTSTRUCT PaintStruct;
    HANDLE hBitmap,hOldBitmap;
    RECT Rect;
    BITMAP Bitmap;
    switch(Message)
    {
        case WM_PAINT:
        hDC=BeginPaint(hWnd,&PaintStruct);
        hBitmap=LoadImage(NULL,"MSDOGS.BMP",IMAGE_BITMAP,0,0,LR_LOADFROMFILE);
        GetObject(hBitmap,sizeof(BITMAP),&Bitmap);
        hCompatibleDC=CreateCompatibleDC(hDC);
        hOldBitmap=SelectObject(hCompatibleDC,hBitmap);
        GetClientRect(hWnd,&Rect);
        StretchBlt(hDC,0,0,Rect.right,Rect.bottom,hCompatibleDC,0,0,Bitmap.bmWidth,Bitmap.bmHeight,SRCCOPY);
        SelectObject(hCompatibleDC,hOldBitmap);
        DeleteObject(hBitmap);
        DeleteDC(hCompatibleDC);
        EndPaint(hWnd,&PaintStruct);
        return 0;
        case WM_DESTROY:
        PostQuitMessage(0);
        return 0;
    }
    return DefWindowProc(hWnd,Message,wParam,lParam);
}

Компилятор почему-то выдаёт следующие ошибки:
undefined reference to 'GetObjectA@12'
undefined reference to 'CreateCompatibleDC@4'
undefined reference to 'SelectObject@8'
undefined reference to 'StretchBlt@44'
undefined reference to 'SelectObject@8'
undefined reference to 'DeleteObject@4'
undefined reference to 'DeleteDC@4'

Хотелось бы узнать:
1. Что они означают.
2. Как их исправить.
3. В книге, по которой я изучаю WinApi написано, что там рассмотрен язык для Windows98 и WindowsNT. У меня стоит WindowsXP. Есть ли различия между программированием в разных виндоузах и насколько они существены?

[Dogmat]

undefined reference означает, что функция на которую вы ссылаетесь в коде отсутстует в DLL. Все эти функции входят в gdi32.dll и дело тут похоже вот в чем. При экспорте функций различные компиляторы могут различным образом искажать имена функций, под которыми они потом хранятся в разделе экспорта. Соответственно эти же компиляторы ожидают, что в разделе экспорта эти функции будут значаться под искаженными именами. Я сам сижу на XP SP3, только что запустил BinDump и в разделе экспорта GDI32.dll функции перечислены без искажения (см. приложение). По всей видимости компилятор следуя собственным правилам ищет их под искаженными именами и не находит. Вообще у меня с этим слабо, но могу сказать что в Visual Studio с этим проблем не возникает. Только что проверил - компилируется. Вы какой компилятор используете? Можно попробовать эти функции объявить с неискаженными именами используя extern.

Попробуйте вставить после #include <windows.h>:

extern GetObjectA;
extern CreateCompatible;
extern SelectObject;
extern StretchBlt;
extern SelectObject;
extern DeleteObject;
extern DeleteDC;

Только, вместо названий впишите полную сигнатуру с параметрами и тип функции, как положено - объявите ее.

Но я совсем не уверен в том, что это поможет.

[Dogmat]

Вообще самому интересно, как из подобных ситуаций выходить, неужели никто ничего больше не посоветует?

[Пепел Феникса]

нужно подключать необходимые библиотеки, для ml(MSVC++) это или в коде через #pragma или в настройках проекта(библиотеки gdi32.lib)
для gcc в ком строке или опять же настройки проекта(если IDE какая то)
библиотека libgdi32.a(в ком строке писать -lgdi32)

[execom]

    {
        case WM_PAINT:
        hDC=BeginPaint(hWnd,&PaintStruct);
        hBitmap=LoadImage(NULL,"MSDOGS.BMP",IMAGE_BITMAP,0,0,LR_LOADFROMFILE);
        GetObject(hBitmap,sizeof(BITMAP),&Bitmap);
        hCompatibleDC=CreateCompatibleDC(hDC);
        hOldBitmap=SelectObject(hCompatibleDC,hBitmap);
        GetClientRect(hWnd,&Rect);
        StretchBlt(hDC,0,0,Rect.right,Rect.bottom,hCompatibleDC,0,0,Bitmap.bmWidth,Bitmap.bmHeight,SRCCOPY);
        SelectObject(hCompatibleDC,hOldBitmap);
        DeleteObject(hBitmap);
        DeleteDC(hCompatibleDC);
        EndPaint(hWnd,&PaintStruct);
        return 0;
        case WM_DESTROY:
        PostQuitMessage(0);
        return 0;
    }

От этого участка кода я бы тоже не пришёл в восторг)) а компилятор и подавно... какой-то корявый вариант.

сишного сорца WinApi окошка под рукой не нашел вот на Delphi

program winmin;

const

  user32              = 'user32.dll';
  WM_DESTROY          = $0002;
  CS_VREDRAW          = 1;
  CS_HREDRAW          = 2;
  IDI_APPLICATION     = PChar(32512);
  IDC_ARROW           = PChar(32512);
  COLOR_BTNFACE       = 15;
  WS_OVERLAPPED       = 0;
  WS_CAPTION          = $C00000;
  WS_SYSMENU          = $80000;
  WS_THICKFRAME       = $40000;
  WS_MINIMIZEBOX      = $20000;
  WS_MAXIMIZEBOX      = $10000;

  WS_OVERLAPPEDWINDOW =(
    WS_OVERLAPPED
  or WS_CAPTION
  or WS_SYSMENU
  or WS_THICKFRAME
  or WS_MINIMIZEBOX
  or WS_MAXIMIZEBOX
  );

type

  TWndClassEx = packed record
    cbSize        : Integer;
    style         : Integer;
    lpfnWndProc   : Pointer;
    cbClsExtra    : Integer;
    cbWndExtra    : Integer;
    hInstance     : integer;
    hIcon         : Integer;
    hCursor       : Integer;
    hbrBackground : Integer;
    lpszMenuName  : PChar;
    lpszClassName : PChar;
    hIconSm       : Integer;
  end;

  TPoint = packed record
    X: Longint;
    Y: Longint;
  end;

  TMSG = packed record
    hwnd    : Integer;
    message : Integer;
    wParam  : Longint;
    lParam  : Longint;
    time    : Integer;
    pt      : TPoint;
  end;

procedure PostQuitMessage(nExitCode: Integer); stdcall; external user32 name 'PostQuitMessage';
function DefWindowProc(hWnd: Integer; Msg: Integer; wParam: Longint; lParam: Longint): LongInt; stdcall; external user32 name 'DefWindowProcA';
function RegisterClassEx(const WndClass: TWndClassEx): Word; stdcall; external user32 name 'RegisterClassExA';
function ShowWindow(hWnd: Integer; nCmdShow: Integer): BOOLEAN; stdcall; external user32 name 'ShowWindow';
function GetMessage(var lpMsg: TMsg; hWnd: Integer; wMsgFilterMin, wMsgFilterMax: Integer): BOOLEAN; stdcall; external user32 name 'GetMessageA';
function TranslateMessage(const lpMsg: TMsg): BOOLEAN; stdcall; external user32 name 'TranslateMessage';
function DispatchMessage(const lpMsg: TMsg): Longint; stdcall; external user32 name 'DispatchMessageA';
function LoadIcon(hInstance: Integer; lpIconName: PChar): Integer; stdcall; external user32 name 'LoadIconA';
function LoadCursor(hInstance: Integer; lpCursorName: PAnsiChar): Integer; stdcall; external user32 name 'LoadCursorA';
function CreateWindowEx(dwExStyle: Integer; lpClassName: PChar; lpWindowName: PChar; dwStyle: Integer; X, Y, nWidth, nHeight: Integer; hWndParent: Integer; hMenu: Integer; hInstance: Integer; lpParam: Pointer): Integer; stdcall; external user32 name 'CreateWindowExA';

var
  wc      : TWndClassEx;
  MainWnd : Integer;
  Mesg    : TMsg;

function WindowProc(wnd:Integer; Msg : Integer; Wparam:Longint; Lparam:Longint):LongInt; stdcall;
Begin
  if msg=wm_destroy then
    Begin
     postquitmessage(0);
     Result:=0;
     exit;
    End
   else Result:=DefWindowProc(wnd,msg,wparam,lparam);
End;

Procedure RegCls;
begin
  wc.cbSize:=sizeof(wc);
  wc.style:=cs_hredraw or cs_vredraw;
  wc.lpfnWndProc:=@WindowProc;
  wc.cbClsExtra:=0;
  wc.cbWndExtra:=0;
  wc.hInstance:=1;
  wc.hIcon:=LoadIcon(0,idi_application);
  wc.hCursor:=LoadCursor(0,idc_arrow);
  wc.hbrBackground:=COLOR_BTNFACE+1;
  wc.lpszMenuName:=nil;
  wc.lpszClassName:='WinMin : Main';
  RegisterClassEx(wc);
end;

Procedure Run;
begin
  RegCls;
  MainWnd:=CreateWindowEx ( 0, 'WinMin : Main', 'WinMin', ws_overlappedwindow, 100, 150, randint(400), 250, 0, 0, 1, nil);
  ShowWindow(MainWnd,1);
  While GetMessage(Mesg,0,0,0) do
    begin
      TranslateMessage(Mesg);
      ///Место для кода
      DispatchMessage(Mesg);
    end;
end;

Begin
Run
end.

[Vago]

Сообщение от execom

    {
        case WM_PAINT:
        hDC=BeginPaint(hWnd,&PaintStruct);
        hBitmap=LoadImage(NULL,"MSDOGS.BMP",IMAGE_BITMAP,0,0,LR_LOADFROMFILE);
        GetObject(hBitmap,sizeof(BITMAP),&Bitmap);
        hCompatibleDC=CreateCompatibleDC(hDC);
        hOldBitmap=SelectObject(hCompatibleDC,hBitmap);
        GetClientRect(hWnd,&Rect);
        StretchBlt(hDC,0,0,Rect.right,Rect.bottom,hCompatibleDC,0,0,Bitmap.bmWidth,Bitmap.bmHeight,SRCCOPY);
        SelectObject(hCompatibleDC,hOldBitmap);
        DeleteObject(hBitmap);
        DeleteDC(hCompatibleDC);
        EndPaint(hWnd,&PaintStruct);
        return 0;
        case WM_DESTROY:
        PostQuitMessage(0);
        return 0;
    }

От этого участка кода я бы тоже не пришёл в восторг)) а компилятор и подавно...

Простите, а от чего здесь "не придёт в восторг" компилятор?

[БалаШагаЛ]

Всем спасибо огромное за помощь!

extern int GetObjectA(void*,int,void*);
extern HDC CreateCompatibleDC(HDC);
extern void* SelectObject(HDC*,void*);
extern BOOL StretchBlt(HDC*,int,int,int,int,HDC*,int,int,int,int,DWORD);
extern BOOL DeleteObject(void*);
extern BOOL DeleteDC(HDC*);

Вставил, не помогло, выдаёт те же ошибки. Использую Code Blocks. Лучше, думаю, просто поставить Visual Studio. В Code Blocks-е и других проблем хватает.

[Пепел Феникса]

вы мой пост не видели?
там ведь описано решение.
библиотеки->добавить и выбрать libgdi32.a

с таким подходом и в студии не выйдет ничего(правда там по умолчанию они подключены, но чуть шаг влево, выйдут теже ошибки)

[БалаШагаЛ]

Если я правильно понял, то надо просто добавить #pragma <gdi32.lib> в код. Не помогло. Видимо, я неправильно понял.

[Пепел Феникса]

мдя, читаете вы очень не внимательно:
1)#pragma comment(lib,"gdi32.lib")
2)я же сказал что это только для студийного компилятора.
для CodeBlocks смотрите настройки проекта.