16.05.2015 Views

Programowanie w C++ Borland Builder - Wyższa Szkoła Informatyki ...

Programowanie w C++ Borland Builder - Wyższa Szkoła Informatyki ...

Programowanie w C++ Borland Builder - Wyższa Szkoła Informatyki ...

SHOW MORE
SHOW LESS

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

STYLE WS_POPUP | WS_DLGFRAME<br />

BEGIN<br />

LTEXT "Przyklad" -1, 0, 12, 160, 8<br />

CTEXT "DLGBOX1 - Przyklad" -1, 0, 36, 160, 8<br />

DEFPUSHBUTTON "OK" IDOK, 64, 60, 32,14, WS_GROUP<br />

END<br />

----------------------------------------------------------------<br />

Pomiędzy parą słów kluczowych BEGIN-END można umieszczać różne<br />

instrukcje sterujące. Definiują one, jaki rodzaj okna<br />

sterującego ukaże się w okienku dialogowym. Instrukcje te można<br />

stosować w następującym formacie:<br />

typ_okna "tekst" ID, x, y, szerokość, wysokość [styl]<br />

Parametr styl jest opcjonalny. Styl okna określają<br />

identyfikatory predefiniowane w API Windows (WS_...). Parametr<br />

ID jest odpowiednikiem identyfikatora dla okien potomnych typu<br />

Child Window; dla okien sterujących, które nie zwracają<br />

komunikatów do okna macierzystego, ma wartość -1. IDOK<br />

wykorzystaliśmy jako identyfikator dla okna sterującego typu<br />

BUTTON. Zostanie on wysłany do funkcji okienkowej jako wartość<br />

parametru wParam, gdy użytkownik kliknie klawisz.<br />

------------------Plik główny: DLGBOX1.CPP----------------------<br />

#include <br />

#include <br />

#include <br />

#include "DLGBOX1.H"<br />

#pragma argused<br />

HANDLE<br />

hInst;<br />

long FAR PASCAL WndProc (HWND, unsigned, WORD, LONG) ;<br />

BOOL FAR PASCAL ControlProc (HWND, unsigned, WORD, LONG) ;<br />

int PASCAL WinMain(HANDLE hInstance, HANDLE hPrevInstance,<br />

LPSTR lpszCmdLine, int nCmdShow )<br />

{<br />

WNDCLASS wndClass;<br />

MSG msg;<br />

HWND hWnd;<br />

if ( !hPrevInstance )<br />

{<br />

wndClass.style= CS_HREDRAW | CS_VREDRAW ;<br />

wndClass.lpfnWndProc= WndProc;<br />

wndClass.cbClsExtra = 0;<br />

wndClass.cbWndExtra= 0;<br />

wndClass.hInstance = hInstance;<br />

wndClass.hIcon = LoadIcon(NULL, szAppName);<br />

wndClass.hCursor= LoadCursor(NULL, IDC_ARROW );<br />

- 412-

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!