257 lines
7.9 KiB
C++
257 lines
7.9 KiB
C++
|
//
|
||
|
|
// EX19WIN.CPP
|
||
|
|
//
|
||
|
|
// C++/Windows Example program for ArchiveLib 2.0
|
||
|
|
//
|
||
|
|
// Copyright (c) Greenleaf Software, Inc. 1994 - 1996
|
||
|
|
// All Rights Reserved
|
||
|
|
//
|
||
|
|
// MEMBERS/FUNCTIONS DEMONSTRATED
|
||
|
|
//
|
||
|
|
// ALName::GetName()
|
||
|
|
// ALName::GetOldName()
|
||
|
|
// ALName::GetSafeOldName()
|
||
|
|
//
|
||
|
|
// DESCRIPTION
|
||
|
|
//
|
||
|
|
// This program demonstrates some of the functions in the ALName
|
||
|
|
// class. It lets you create an ALName object, rename it, and
|
||
|
|
// delete it. After these operations, it prints out some key
|
||
|
|
// states on the ALName object.
|
||
|
|
//
|
||
|
|
// REVISION HISTORY
|
||
|
|
//
|
||
|
|
// February 1, 1996 2.0A : Second release
|
||
|
|
//
|
||
|
|
//
|
||
|
|
|
||
|
|
#define STRICT
|
||
|
|
#include <windows.h>
|
||
|
|
#include <stdarg.h>
|
||
|
|
|
||
|
|
#include "al.h"
|
||
|
|
#include "ex19win.h"
|
||
|
|
|
||
|
|
HINSTANCE hInstance;
|
||
|
|
HWND hDlgMain;
|
||
|
|
ALName *name = 0;
|
||
|
|
|
||
|
|
void SizeFramingWindow( HWND hDlg );
|
||
|
|
|
||
|
|
//
|
||
|
|
// After any of the operations on the ALName object, this routine is called
|
||
|
|
// to update the stats in the dialog box.
|
||
|
|
//
|
||
|
|
void Update( HWND hDlg )
|
||
|
|
{
|
||
|
|
char buf[ 21 ];
|
||
|
|
const char AL_DLL_FAR *p;
|
||
|
|
|
||
|
|
int good_tag = name->GoodTag();
|
||
|
|
wsprintf( buf, "%d", good_tag );
|
||
|
|
SetDlgItemText( hDlg, AL_GOOD_TAG, buf );
|
||
|
|
if ( good_tag ) {
|
||
|
|
SetDlgItemText( hDlg, AL_NAME, name->GetName() );
|
||
|
|
p = name->GetOldName();
|
||
|
|
if ( !p )
|
||
|
|
p = "<Null pointer>";
|
||
|
|
SetDlgItemText( hDlg, AL_OLD_NAME, p );
|
||
|
|
p = name->GetSafeOldName();
|
||
|
|
if ( p[ 0 ] == '\0' )
|
||
|
|
p = "Empty string";
|
||
|
|
SetDlgItemText( hDlg, AL_SAFE_OLD_NAME, p );
|
||
|
|
}
|
||
|
|
#ifdef _DEBUG
|
||
|
|
else {
|
||
|
|
SetDlgItemText( hDlg, AL_NAME, "<Invalid object>" );
|
||
|
|
SetDlgItemText( hDlg, AL_OLD_NAME, "<Invalid object>" );
|
||
|
|
SetDlgItemText( hDlg, AL_SAFE_OLD_NAME, "<Invalid object>" );
|
||
|
|
}
|
||
|
|
#endif
|
||
|
|
}
|
||
|
|
|
||
|
|
//
|
||
|
|
// In this program, we have a main window, but it is just a dummy framing
|
||
|
|
// windows for the dialog box. This dialog box proc is where all the action
|
||
|
|
// takes place. It handles input keystrokes and button presses from the
|
||
|
|
// dialog.
|
||
|
|
//
|
||
|
|
BOOL AL_EXPORT CALLBACK MainDialogProc( HWND hDlg,
|
||
|
|
UINT message,
|
||
|
|
WPARAM wParam,
|
||
|
|
LPARAM )
|
||
|
|
{
|
||
|
|
switch ( message ) {
|
||
|
|
//
|
||
|
|
// This sets the title bar and creates the initial copy of the ALName object.
|
||
|
|
//
|
||
|
|
case WM_INITDIALOG :
|
||
|
|
SizeFramingWindow( hDlg );
|
||
|
|
SetWindowText( hDlg, "Windows Example 19" );
|
||
|
|
name = new ALName( "Test name" );
|
||
|
|
Update( hDlg );
|
||
|
|
return( TRUE );
|
||
|
|
//
|
||
|
|
// The button presses form the dialog are passed into this routine as
|
||
|
|
// WM_COMMAND messages.
|
||
|
|
//
|
||
|
|
case WM_COMMAND :
|
||
|
|
switch ( wParam ) {
|
||
|
|
case AL_CREATE :
|
||
|
|
name = new ALName( "Test name" );
|
||
|
|
Update( hDlg );
|
||
|
|
break;
|
||
|
|
case AL_DELETE :
|
||
|
|
delete name;
|
||
|
|
Update( hDlg );
|
||
|
|
break;
|
||
|
|
case AL_RENAME :
|
||
|
|
*name = "New name";
|
||
|
|
Update( hDlg );
|
||
|
|
break;
|
||
|
|
case AL_EXIT :
|
||
|
|
case WM_QUIT :
|
||
|
|
case WM_DESTROY :
|
||
|
|
PostMessage( GetParent( hDlg ),WM_DESTROY, 0, 0 );
|
||
|
|
DestroyWindow( hDlgMain );
|
||
|
|
hDlgMain = 0;
|
||
|
|
return TRUE;
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
return FALSE;
|
||
|
|
}
|
||
|
|
|
||
|
|
//
|
||
|
|
// The about box.
|
||
|
|
//
|
||
|
|
BOOL AL_EXPORT CALLBACK
|
||
|
|
AboutDialogProc( HWND hDlg, UINT message, WPARAM wParam, LPARAM )
|
||
|
|
{
|
||
|
|
switch ( message ) {
|
||
|
|
case WM_INITDIALOG :
|
||
|
|
RECT rc;
|
||
|
|
GetWindowRect( hDlg, &rc );
|
||
|
|
SetWindowPos( hDlg,
|
||
|
|
NULL,
|
||
|
|
(short int) ((GetSystemMetrics(SM_CXSCREEN) - (rc.right - rc.left)) / 2),
|
||
|
|
(short int) ((GetSystemMetrics(SM_CYSCREEN) - (rc.bottom - rc.top)) / 2),
|
||
|
|
0, 0, SWP_NOSIZE | SWP_NOACTIVATE);
|
||
|
|
break;
|
||
|
|
case WM_COMMAND :
|
||
|
|
switch ( wParam ) {
|
||
|
|
case IDOK :
|
||
|
|
case WM_QUIT :
|
||
|
|
case WM_DESTROY :
|
||
|
|
EndDialog( hDlg, TRUE );
|
||
|
|
return TRUE;
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
return FALSE;
|
||
|
|
}
|
||
|
|
|
||
|
|
//
|
||
|
|
// The main window is nothing more than a shell that exists to manage
|
||
|
|
// the dialog box, take menu commands, and process accelerator keys.
|
||
|
|
//
|
||
|
|
LONG AL_EXPORT CALLBACK MainWndProc( HWND hWnd,
|
||
|
|
UINT message,
|
||
|
|
WPARAM wParam,
|
||
|
|
LPARAM lParam )
|
||
|
|
{
|
||
|
|
switch ( message ) {
|
||
|
|
case WM_COMMAND:
|
||
|
|
switch( wParam ) {
|
||
|
|
case AL_EXIT :
|
||
|
|
PostQuitMessage( 0 );
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
case WM_SETFOCUS:
|
||
|
|
SetFocus( hDlgMain ); // insure that the Dialog Box has the focus
|
||
|
|
break;
|
||
|
|
case WM_DESTROY:
|
||
|
|
PostQuitMessage( 0 );
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
return DefWindowProc( hWnd, message, wParam, lParam );
|
||
|
|
}
|
||
|
|
|
||
|
|
//
|
||
|
|
// WinMain registers our class. It then creates the dialog, and starts the
|
||
|
|
// message pump.
|
||
|
|
//
|
||
|
|
int PASCAL WinMain( HINSTANCE instance,
|
||
|
|
HINSTANCE previous_instance,
|
||
|
|
LPSTR,
|
||
|
|
int nCmdShow )
|
||
|
|
{
|
||
|
|
hInstance = instance;
|
||
|
|
if ( previous_instance == 0 ) {
|
||
|
|
WNDCLASS wc;
|
||
|
|
wc.style = 0;
|
||
|
|
wc.lpfnWndProc = MainWndProc;
|
||
|
|
wc.cbClsExtra = 0;
|
||
|
|
wc.cbWndExtra = 0;
|
||
|
|
wc.hInstance = instance;
|
||
|
|
wc.hIcon = LoadIcon( hInstance, "ALIcon" );
|
||
|
|
wc.hCursor = LoadCursor(NULL,IDC_ARROW);
|
||
|
|
wc.hbrBackground = (HBRUSH) GetStockObject( WHITE_BRUSH );
|
||
|
|
wc.lpszMenuName = "ALMenu";
|
||
|
|
wc.lpszClassName = "ALClass";
|
||
|
|
if ( !RegisterClass( &wc ) )
|
||
|
|
return FALSE;
|
||
|
|
}
|
||
|
|
HWND hWnd = CreateWindow( "ALClass",
|
||
|
|
"ArchiveLib Example Program",
|
||
|
|
WS_OVERLAPPED | WS_CAPTION | WS_MINIMIZEBOX | WS_SYSMENU,
|
||
|
|
CW_USEDEFAULT,
|
||
|
|
0,
|
||
|
|
0,
|
||
|
|
0,
|
||
|
|
NULL,
|
||
|
|
NULL,
|
||
|
|
hInstance,
|
||
|
|
NULL );
|
||
|
|
|
||
|
|
FARPROC lpfn = MakeProcInstance( (FARPROC) MainDialogProc, hInstance );
|
||
|
|
hDlgMain = CreateDialog( hInstance, "ALMainDialog", hWnd, (DLGPROC) lpfn );
|
||
|
|
ShowWindow( hWnd, (short) nCmdShow );
|
||
|
|
ShowWindow( hDlgMain, SW_SHOW );
|
||
|
|
MSG msg;
|
||
|
|
while ( GetMessage ( &msg, NULL, NULL, NULL ) ) {
|
||
|
|
if ( hDlgMain == NULL || !IsDialogMessage( hDlgMain,&msg ) ) {
|
||
|
|
TranslateMessage( &msg );
|
||
|
|
DispatchMessage( &msg );
|
||
|
|
}
|
||
|
|
}
|
||
|
|
return (msg.wParam);
|
||
|
|
}
|
||
|
|
|
||
|
|
//
|
||
|
|
// I need this routine for one purpose only. After the dialog is loaded,
|
||
|
|
// it calls this routine, which adjusts the size of the framing window to
|
||
|
|
// fit exactly around the dialog box. It also moves it to the center of
|
||
|
|
// the screen.
|
||
|
|
//
|
||
|
|
|
||
|
|
void SizeFramingWindow( HWND hDlg )
|
||
|
|
{
|
||
|
|
RECT rect;
|
||
|
|
|
||
|
|
GetWindowRect( hDlg, &rect );
|
||
|
|
int y = GetSystemMetrics( SM_CYSCREEN );
|
||
|
|
y -= ( rect.bottom - rect.top );
|
||
|
|
y -= GetSystemMetrics( SM_CYMENU ) + GetSystemMetrics( SM_CYCAPTION );
|
||
|
|
y /= 2;
|
||
|
|
int x = GetSystemMetrics( SM_CXSCREEN );
|
||
|
|
x -= rect.right - rect.left;
|
||
|
|
x /= 2;
|
||
|
|
SetWindowPos( GetParent( hDlg ), NULL, (short) x, (short) y,
|
||
|
|
(short int) ( rect.right-rect.left ),
|
||
|
|
(short int) ( rect.bottom-rect.top +
|
||
|
|
GetSystemMetrics( SM_CYMENU ) +
|
||
|
|
GetSystemMetrics( SM_CYCAPTION ) ),
|
||
|
|
SWP_NOZORDER );
|
||
|
|
}
|