106 lines
3 KiB
C
106 lines
3 KiB
C
|
#include <windows.h>
|
||
|
|
#include <stdio.h>
|
||
|
|
#include <stdlib.h>
|
||
|
|
#include <string.h>
|
||
|
|
#include "view.h"
|
||
|
|
#include "mdi.h"
|
||
|
|
#include "icon.h"
|
||
|
|
#include "switch.h"
|
||
|
|
#include "win1632.h"
|
||
|
|
|
||
|
|
static an_MDI_icon *MDI_Icon;
|
||
|
|
|
||
|
|
#define MAX_ICON_STRING 80
|
||
|
|
|
||
|
|
/*
|
||
|
|
* FillListBox - fills the listbox control of the given dialog,
|
||
|
|
* (identified by child_id) with strings which represent the display modes
|
||
|
|
* of the various icons found in the fill which contains the MDI icon
|
||
|
|
* pointed at by MDI_Icon.
|
||
|
|
*/
|
||
|
|
|
||
|
|
static void FillListBox( HWND dialog, unsigned child_id )
|
||
|
|
{
|
||
|
|
HWND list_box;
|
||
|
|
FILE *fp;
|
||
|
|
an_icon_file *icon_file;
|
||
|
|
an_icon_resource res;
|
||
|
|
char buffer[ MAX_ICON_STRING ];
|
||
|
|
int max_icons, i;
|
||
|
|
|
||
|
|
list_box = GetDlgItem( dialog, child_id );
|
||
|
|
fp = fopen( MDI_Icon->file_name, "rb" );
|
||
|
|
if( !fp ) return;
|
||
|
|
icon_file = IconOpen( fp );
|
||
|
|
fclose( fp );
|
||
|
|
max_icons = IconCount( icon_file );
|
||
|
|
for( i = 0; i < max_icons; i++ ) {
|
||
|
|
IconResInfo( icon_file, &res, i );
|
||
|
|
wsprintf( buffer, "%d x %d - %d colour",
|
||
|
|
res.width, res.height, res.colour_count );
|
||
|
|
SendMessage( list_box, LB_ADDSTRING, 0, (LONG) (LPSTR) &buffer );
|
||
|
|
}
|
||
|
|
SendMessage( list_box, LB_SETCURSEL, MDI_Icon->current_icon, 0L );
|
||
|
|
IconClose( icon_file );
|
||
|
|
} /* FillListBox */
|
||
|
|
|
||
|
|
/*
|
||
|
|
* SwitchDialogProc - window proc for the dialog which handles the loading
|
||
|
|
* of a different icon from the current file.
|
||
|
|
*/
|
||
|
|
|
||
|
|
int FAR _EXPORT PASCAL SwitchDialogProc( HWND dialog,
|
||
|
|
UINT msg, WPARAM wparam, LPARAM lparam )
|
||
|
|
{
|
||
|
|
int select;
|
||
|
|
WORD cmd;
|
||
|
|
|
||
|
|
lparam = lparam;
|
||
|
|
switch( msg ) {
|
||
|
|
case WM_INITDIALOG:
|
||
|
|
/* fill list box with strings representing the various icons */
|
||
|
|
FillListBox( dialog, IDLISTBOX );
|
||
|
|
break;
|
||
|
|
case WM_COMMAND:
|
||
|
|
cmd = LOWORD( wparam );
|
||
|
|
switch( cmd ) {
|
||
|
|
case IDLISTBOX:
|
||
|
|
if( GET_WM_COMMAND_CMD( wparam, lparam ) != LBN_DBLCLK ) break;
|
||
|
|
/* fall through */
|
||
|
|
case IDOK:
|
||
|
|
select = (int) SendMessage( GetDlgItem( dialog, IDLISTBOX ),
|
||
|
|
LB_GETCURSEL, 0, 0L );
|
||
|
|
if( select != LB_ERR ) MDI_Icon->current_icon = select;
|
||
|
|
/* Fall through */
|
||
|
|
case IDCANCEL:
|
||
|
|
EndDialog( dialog, cmd != IDCANCEL );
|
||
|
|
break;
|
||
|
|
default:
|
||
|
|
return( FALSE );
|
||
|
|
}
|
||
|
|
default:
|
||
|
|
return( FALSE );
|
||
|
|
}
|
||
|
|
return( TRUE );
|
||
|
|
} /* SwitchDialogProc */
|
||
|
|
|
||
|
|
/*
|
||
|
|
* SwitchIcon - switches the icon which is displayed (chosen from
|
||
|
|
* all icons available within the file associated with the icon).
|
||
|
|
* Returns TRUE if the user chooses an icon type from the file,
|
||
|
|
* otherwise returns FALSE. icon->current_icon will be set to the
|
||
|
|
* user's choice if they selected a new icon.
|
||
|
|
*/
|
||
|
|
|
||
|
|
int SwitchIcon( an_MDI_icon *icon )
|
||
|
|
{
|
||
|
|
FARPROC func;
|
||
|
|
int ret_val;
|
||
|
|
|
||
|
|
MDI_Icon = icon;
|
||
|
|
func = MakeProcInstance( (FARPROC)SwitchDialogProc, Instance );
|
||
|
|
ret_val = DialogBox( Instance, "SwitchBox", FrameWindow, (DLGPROC)func );
|
||
|
|
FreeProcInstance( func );
|
||
|
|
return( ret_val );
|
||
|
|
} /* SwitchIcon */
|