void ProcessKey(HWND hWnd, UINT key)
{
int i;
BOOL bFound = FALSE;
char ch = LOBYTE(key);
if (bFinished) return;
// Check for any matches in the word
for (i=0; i<lstrlen(szGuess); i++)
{
if (ch == ToUpper(szGuess[i]) && ch != ToUpper(szGuessDisplay[i]))
{
szGuessDisplay[i] = szGuess[i];
bFound = TRUE;
}
}
// A character was found
if (bFound)
{
SetDlgItemText(hWnd, IDC_PUZZLE_NAME, szGuessDisplay);
if (lstrcmpi(szGuessDisplay, szGuess) == 0)
{
AnnounceWin(hWnd, TRUE);
PostMessage(hWnd, WM_COMMAND, HS_SHOWME, 0L);
}
else
SoundStartResource("GOODANSWER1", FALSE, 0);
}
else
{
AdjustGuesses(hWnd, -1);
SoundStartResource("WRONGANSWER2", FALSE, 0);
}
}
int Dot2DotProc(
/************************************************************************/
HWND hWindow,
LPARAM lParam,
UINT msg)
{
int xPos, yPos;
int x, y;
RECT rDot;
HWND hImageCtrl;
xPos = LOWORD(lParam);
yPos = HIWORD(lParam);
switch (msg)
{
case WM_CREATE: // mouse down messages
case WM_LBUTTONDOWN:
x = DotPoints[iActiveDot].x - (DOT_DIAMETER / 2);
y = DotPoints[iActiveDot].y - (DOT_DIAMETER / 2);
SetRect(&rDot, x, y, x+DOT_DIAMETER, y+DOT_DIAMETER);
if (PtInRect(&rDot, MAKEPOINT(lParam)))
{
SoundStartResource("ICONS", FALSE, 0);
iActiveDot++;
hImageCtrl = GetDlgItem(hDot2DotWnd, IDC_HIDDEN_IMAGE);
PaintDot2Dots(hImageCtrl);
if (!CheckFinished())
{
SoundStartResource("GOODANSWER3", FALSE, 0);
UpdateDot2DotImage(hDot2DotWnd, NULL);
}
}
else
SoundStartResource("WRONGANSWER3", FALSE, 0);
break;
case WM_SETCURSOR:
return TRUE;
case WM_LBUTTONUP:
break;
case WM_MOUSEMOVE: // sent when ToolActive is on
break;
}
return TRUE;
}
int PuzzleProc(
/************************************************************************/
HWND hWindow,
LPARAM lParam,
UINT msg)
{
int x, y;
LPOBJECT lpObject;
HWND hImageCtrl;
RECT rUpdate;
x = LOWORD(lParam);
y = HIWORD(lParam);
switch (msg)
{
case WM_CREATE: // The first mouse down message
case WM_LBUTTONDOWN:
lpObject = ImgFindObject(lpImage, x, y, TRUE, TRUE);
if (lpObject && !lpObject->fHidden)
{
#ifndef _MAC
SoundStartResource("ICONS", FALSE, 0);
#endif
lpObject->fHidden = TRUE;
rUpdate = lpObject->rObject;
InflateRect(&rUpdate, 2, 2);
hImageCtrl = GetDlgItem(hPuzzleWnd, IDC_PUZZLE_IMAGE);
InvalidateRect(hImageCtrl, &rUpdate, FALSE);
UpdateWindow(hImageCtrl);
AdjustGuesses(hPuzzleWnd, -1);
}
break;
case WM_SETCURSOR:
return TRUE;
case WM_LBUTTONUP:
break;
case WM_MOUSEMOVE: // sent when ToolActive is on
break;
case WM_KEYDOWN:
ProcessKey (hPuzzleWnd, (UINT)lParam);
break;
}
return TRUE;
}
WORD MessageStatusEx( int idStr, ... )
/***********************************************************************/
{
BOOL bShow = Control.Hints && fAppActive;
char szBuffer[256];
LPTR lpArguments;
LPSTR lpString;
// Used to paint the hint bubble with a string.
// Arguments specified exactly like printf.
// Caller passes stringtable ID's, not hardcoded strings.
*szBuffer = 0;
switch (idStr)
{
case IDS_READY:
idStr = 0;
break;
case HS_HORN:
idStr = SoundIsOn() ? IDS_SOUND_ON : IDS_SOUND_OFF;
bShow = fAppActive;
break;
case HS_TOUR:
idStr = Control.Hints ? IDS_TOUR_GUIDE_ON : IDS_TOUR_GUIDE_OFF;
bShow = fAppActive;
break;
case HS_BACKSHOW:
idStr = (idPreviousRoom == RM_SLIDE) ? HS_BACKSHOW : HS_BACKART;
break;
}
if ( AnimateIsOn() )
{
bShow = NO;
}
else if (idStr && AstralStr (idStr,&lpString))
{
lpArguments = (LPTR)&idStr + sizeof idStr;
wvsprintf (szBuffer,lpString,(LPSTR)lpArguments);
}
//SMS - this didn't work when set to Audio hints only since there is no
//way to throttle starting the sounds, they started like a machine gun....
//#ifdef CDBUILD
// if (bShow)
// {
// if (Control.bBubbleHints)
// {
// if (Status (0,bShow ? szBuffer : NULL))
// {
// if (Control.bAudioHints)
// SoundStartResource ((LPSTR)MAKEINTRESOURCE(idStr), FALSE, 0);
// }
// }
// else if (Control.bAudioHints)
// SoundStartResource ((LPSTR)MAKEINTRESOURCE(idStr), FALSE, 0);
// else
// Status ((HWND)-1, NULL);
// }
// else
// Status ((HWND)-1, NULL);
//#else
if (Status (0,bShow ? szBuffer : NULL))
SoundStartResource ((LPSTR) MAKEINTRESOURCE (idStr),FALSE,0);
//#endif
return NULL;
}
int TextProc(
/************************************************************************/
HWND hWindow,
LPARAM lParam,
UINT msg)
{
int x, y;
BOOL fCancel = NO;
WORD wKey;
STRING szString;
static BOOL bTrackObject;
static int xMove, yMove;
if ( bTrackObject )
{
ToyProc( hWindow, lParam, msg );
bTrackObject = Tool.bActive;
Tool.bActive = YES;
return( TRUE );
}
x = LOWORD( lParam );
y = HIWORD( lParam );
switch (msg)
{
case WM_CREATE: // The first mouse down message
Tool.bActive = YES;
break; // Never get sent since Tool.bActive is already set in the dialog
case WM_LBUTTONDOWN:
// Call the sticker mover tool first to see if he wants to take over
Tool.bActive = NO;
ToyProc( hWindow, lParam, WM_CREATE );
if ( bTrackObject = Tool.bActive )
{
ToyProc( hWindow, lParam, msg );
break;
}
if ( bTextBegun )
Tool.bActive = YES;
xMove = x;
yMove = y;
// TextMove(hWindow, x, y);
break;
case WM_LBUTTONUP:
break;
case WM_SETCURSOR:
return( SetToolCursor( hWindow, ID_MOVE_OBJECT, ID_PLAY_OBJECT ) );
case WM_MOUSEMOVE: // sent when ToolActive is on
if ( Tool.bActive && Window.fLButtonDown )
TextOffset(hWindow, x - xMove, y - yMove);
xMove = x;
yMove = y;
break;
case WM_KILLFOCUS:
break;
case WM_SETFOCUS:
// TextDisplayCaret( hWindow, NULL );
break;
case WM_CHAR:
wKey = (WORD)lParam;
TextKeystroke(hWindow, wKey);
if ( wKey == VK_RETURN )
{
TextAnchor( hWindow );
RandomizeActiveColor();
break;
}
szString[0] = '_';
szString[1] = wKey;
szString[2] = '\0';
Lowercase( szString );
SoundStartResource( szString, NO/*bLoop*/, NULL/*hInstance*/ );
break;
case WM_KEYDOWN:
wKey = lParam;
switch (wKey)
{
case VK_UP:
TextRMove(hWindow, 0, -1);
break;
case VK_DOWN:
TextRMove(hWindow, 0, 1);
break;
case VK_LEFT:
TextRMove(hWindow, -1, 0);
break;
case VK_RIGHT:
TextRMove(hWindow, 1, 0);
break;
default:
break;
}
break;
case WM_DESTROY: // The cancel and DeactivateTool() message
fCancel = (lParam == 1L);
if ( fCancel )
{ // an "escape" cancel
TextKeystroke( hWindow, VK_ESCAPE );
}
else
{ // a deactivate
TextKeystroke( hWindow, VK_RETURN );
TextAnchor( hWindow );
RandomizeActiveColor();
HideCaret( hWindow );
DestroyCaret();
AstralUpdateWindow( hWindow );
}
break;
case WM_LBUTTONDBLCLK:
break;
}
return(TRUE);
}
BOOL WINPROC EXPORT DlgTextProc(
/***********************************************************************/
HWND hDlg,
UINT msg,
WPARAM wParam,
LPARAM lParam)
{
int i;
WORD wKey;
HFONT hFont;
STRING szString;
switch (msg)
{
case WM_INITDIALOG:
RibbonInit( hDlg );
ColorInit( hDlg );
GetFonts( hDlg );
CheckRadioButton( hDlg, IDC_TEXT_T1, IDC_TEXT_T10, Text.nFont+IDC_TEXT_T1 );
Text.Size = 48;
InitSlide( hDlg, IDC_TEXT_SIZE, Text.Size, 24, 200 );
Text.Angle = 0;
InitSlide( hDlg, IDC_TEXT_ANGLE, 0, -2, 2 );
ControlEnable(hDlg, IDC_TEXT_ANGLE, TextCanRotate(hDlg, Text.nFont));
for ( i=0; i<max(10,Text.nFont); i++ )
{
hFont = CreateFont(
/* Height */ 45,
/* Width */ 0,
/* Escapement */ 0,
/* Orientation */ 0,
/* Weight */ FW_NORMAL,
/* Italic */ FALSE,
/* UnderLine */ FALSE,
/* StrikeOut */ FALSE,
/* CharSet */ Text.lpFontList[i].fdCharSet,
/* Output Precis */ OUT_CHARACTER_PRECIS,
/* Clip Precis */ CLIP_DEFAULT_PRECIS,
/* Quality */ PROOF_QUALITY,
/* PitchAndFamily */ Text.lpFontList[i].fdPitchAndFamily,
/* Face */ Text.lpFontList[i].fdFaceName );
if ( hFont )
SendDlgItemMessage( hDlg, IDC_TEXT_T1+i, WM_SETFONT, (WPARAM)hFont, 0L );
}
if ( lpImage )
{
bTextBegun = TextBegin( lpImage->hWnd, 10/*x*/, 40/*y*/ );
Tool.bActive = YES;
SetFocus( lpImage->hWnd );
}
else
bTextBegun = NO;
// fall thru
case WM_CONTROLENABLE:
case WM_DOCACTIVATED:
break;
case WM_DESTROY:
if ( bTextBegun )
{
if ( lpImage )
{
TextEnd( lpImage->hWnd, NO/*fCancel*/ );
Tool.bActive = NO;
AstralUpdateWindow( lpImage->hWnd );
}
bTextBegun = NO;
}
for ( i=0; i<max(10,Text.nFont); i++ )
{
if ( hFont = (HFONT)SendDlgItemMessage( hDlg, IDC_TEXT_T1+i, WM_GETFONT, (WPARAM)0, 0L ) )
DeleteObject( hFont );
}
if ( Text.lpFontList )
{
FreeUp((LPTR)Text.lpFontList);
Text.lpFontList = NULL;
}
break;
case WM_CHAR:
if ( !lpImage || !bTextBegun )
return( FALSE );
TextSetFocus();
wKey = (WORD)lParam;
TextKeystroke( lpImage->hWnd, wKey );
if ( wKey == VK_RETURN )
{
TextAnchor( lpImage->hWnd );
RandomizeActiveColor();
break;
}
szString[0] = '_';
szString[1] = wKey;
szString[2] = '\0';
Lowercase( szString );
SoundStartResource( szString, NO/*bLoop*/, NULL/*hInstance*/ );
break;
case WM_KEYDOWN:
if ( !lpImage || !bTextBegun )
return( FALSE );
wKey = lParam;
switch (wKey)
{
case VK_UP:
TextRMove( lpImage->hWnd, 0, -1 );
break;
case VK_DOWN:
TextRMove( lpImage->hWnd, 0, 1);
break;
case VK_LEFT:
TextRMove( lpImage->hWnd, -1, 0);
break;
case VK_RIGHT:
TextRMove( lpImage->hWnd, 1, 0);
break;
default:
break;
}
break;
case WM_SETCURSOR:
return( SetupCursor( wParam, lParam, IDD_TEXT ) );
case WM_ERASEBKGND:
break; // handle ERASEBKGND and do nothing; PAINT covers everything
case WM_PAINT:
LayoutPaint( hDlg );
break;
case WM_CLOSE:
AstralDlgEnd( hDlg, FALSE );
break;
case WM_MEASUREITEM:
case WM_DRAWITEM:
return( OwnerDraw( hDlg, msg, lParam, NO ) );
case WM_CTLCOLOR:
// We don't get this message
// Print( "%u", HIWORD(lParam) );
// if ( HIWORD(lParam) == CTLCOLOR_BTN )
// {
// SetTextColor( (HDC)wParam, RGB(0,0,255) ); // Blue text...
// SetBkColor( (HDC)wParam, RGB(255,255,255) ); // on a white background
// return( GetStockObject(WHITE_BRUSH) );
// }
return( (BOOL)SetControlColors( (HDC)wParam, hDlg, (HWND)LOWORD(lParam),
HIWORD(lParam) ) );
case WM_COMMAND:
switch (wParam)
{
case IDC_ACTIVECOLOR:
case IDC_COLORS_TEXT:
ColorCommand( hDlg, wParam, lParam );
TextSetFocus();
if (bTextBegun)
TextFontChanged(lpImage->hWnd);
break;
case IDC_TEXT_T1:
case IDC_TEXT_T2:
case IDC_TEXT_T3:
case IDC_TEXT_T4:
case IDC_TEXT_T5:
case IDC_TEXT_T6:
case IDC_TEXT_T7:
case IDC_TEXT_T8:
case IDC_TEXT_T9:
case IDC_TEXT_T10:
CheckRadioButton( hDlg, IDC_TEXT_T1, IDC_TEXT_T10, wParam );
Text.nFont = wParam - IDC_TEXT_T1;
ControlEnable(hDlg, IDC_TEXT_ANGLE, TextCanRotate(hDlg, Text.nFont));
TextSetFocus();
if (bTextBegun)
TextFontChanged(lpImage->hWnd);
break;
case IDC_TEXT_SIZE:
Text.Size = HandleSlide( hDlg, (ITEMID)wParam, (UINT)lParam, NULL );
Text.Size = bound( Text.Size, 16, 216 );
if ( !LBUTTON )
TextSetFocus();
if (bTextBegun)
TextFontChanged(lpImage->hWnd);
break;
case IDC_TEXT_ANGLE:
i = HandleSlide( hDlg, (ITEMID)wParam, (UINT)lParam, NULL ); // -2 to 2
Text.Angle = (i * 45);
if ( Text.Angle < 0 )
Text.Angle += 360;
i = (Text.Angle + 22) / 45; // down to 0-8
if ( i > 4 )
i = bound( i - 8, -2, 0 );
else i = bound( i, 0, 2 );
SetSlide( hDlg, wParam, i );
if ( !LBUTTON )
TextSetFocus();
if (bTextBegun)
TextFontChanged(lpImage->hWnd);
break;
default:
return( FALSE );
}
default:
return( FALSE );
}
return( TRUE );
}
static BOOL FAR MazeToolProc (HWND hWnd,LONG lParam,WORD wMsg)
{
HDC hDC;
LPFRAME lpFrame;
LPTR lpLine;
POINT pt;
RGBS Pixel;
static int x1,y1;
pt.x = LOWORD(lParam);
pt.y = HIWORD(lParam);
switch (wMsg)
{
case WM_LBUTTONDOWN:
if (!bTrack)
{
lpFrame = ImgGetBaseEditFrame (lpImage);
lpLine = FramePointer (lpFrame,pt.x,pt.y,FALSE);
FrameGetRGB (lpFrame,lpLine,&Pixel,1);
if (Pixel.green && !(Pixel.red & Pixel.blue)) // start green pel
{
// SoundStartID (IDC_LINES,NO,0);
SoundStartResource ("icons",NO,0);
MazeTrailPoints[0].x = x1 = pt.x;
MazeTrailPoints[0].y = y1 = pt.y;
nNumTrailPoints = 1;
if (bShowSolution || bSolved)
{
bShowSolution = bSolved = FALSE;
InvalidateRect (hWnd,NULL,FALSE);
UpdateWindow (hWnd);
}
bTrack = TRUE;
}
else if (!AnimateProc(hWnd,lParam,wMsg))
SoundStartResource ("WRONGANSWER1",NO,0);
}
break;
case WM_MOUSEMOVE:
if (!bTrack)
break;
if (!fAppActive || GetUpdateRect (hWnd,NULL,FALSE))
{
InvertLine (hWnd,x1,y1,x1,y1);
break;
}
InvertLine (hWnd,x1,y1,pt.x,pt.y);
if (!LBUTTON || (pt.x == x1 && pt.y == y1))
break;
// else button is down, so fall through to anchor a point
case WM_LBUTTONUP:
if (bTrack)
{
if (PathIsClear (x1,y1,pt.x,pt.y))
{
lpFrame = ImgGetBaseEditFrame (lpImage);
lpLine = FramePointer (lpFrame,pt.x,pt.y,FALSE);
FrameGetRGB (lpFrame,lpLine,&Pixel,1);
if (Pixel.red && !(Pixel.green & Pixel.blue)) // end red pel
{
SoundStartResource ("GOODANSWER1",NO,0);
StartAnimation(hWnd);
bSolved = TRUE;
bTrack = FALSE;
}
else
{
hDC = GetDC (hWnd);
DrawLineEx (hDC,x1,y1,pt.x,pt.y,
hMazePen ? hMazePen : (HPEN)GetStockObject (BLACK_PEN),FALSE);
ReleaseDC (hWnd,hDC);
x1 = pt.x;
y1 = pt.y;
if (nNumTrailPoints < MAX_LINEPOINTS)
{
MazeTrailPoints[nNumTrailPoints].x = x1;
MazeTrailPoints[nNumTrailPoints].y = y1;
nNumTrailPoints++;
}
}
}
else
SoundStartResource ("WRONGANSWER1",NO,0);
}
break;
case WM_PAINT:
if (bTrack)
{
int i;
hDC = GetDC (hWnd);
pt.x = MazeTrailPoints[0].x;
pt.y = MazeTrailPoints[0].y;
for (i = 1; i < nNumTrailPoints; i++)
{
DrawLineEx (hDC,pt.x,pt.y,
MazeTrailPoints[i].x,MazeTrailPoints[i].y,
hMazePen ? hMazePen : (HPEN)GetStockObject (BLACK_PEN),FALSE);
pt.x = MazeTrailPoints[i].x;
pt.y = MazeTrailPoints[i].y;
}
ReleaseDC (hWnd,hDC);
}
break;
}
return TRUE;
}
long DoCommand( HWND hWindow, WPARAM wParam, LPARAM lParam )
/***********************************************************************/
{
FNAME szFileName;
LPFRAME lpFrame;
LPOBJECT lpObject, lpBase;
RECT rect, rMask, rTemp, rAll;
HWND hWnd;
STRING szString;
int i, idFileType, x, y, dx, dy;
BOOL fDoZoom, bPrint, fHasZoom;
LPSTR lpszCmdLine;
HGLOBAL hMem;
ITEMID idDataType;
DWORD dwReturn;
int NewShape;
UINT wID;
SoundStartID( wParam, NO/*bLoop*/, NULL/*hInstance*/ );
/*
WIN16: ID = wParam
ctrl handle = LOWORD(lParam)
notify code = HIWORD(lParam)
WIN32: ID = LOWORD(wParam)
ctrl handle = lParam
notify code = HIWORD(wParam)
*/
#ifdef WIN32
wID = LOWORD(wParam);
#else
wID = wParam;
#endif
switch (wID)
{
case IDM_EXIT:
DeactivateTool();
PostMessage( hWndAstral, WM_CLOSE, 0, 0L);
Delay (750);
break;
case IDM_CLOSE:
DeactivateTool();
/* Check to see if the image needs to be saved */
if ( !ConfirmClose(NO,NO) )
break;
CloseImage( NO, lpImage ); // Close the active image
break;
case IDM_ABOUT:
/* Bring up the modal 'About' dialog box */
AstralDlg( NO|2, hInstAstral, hWindow, IDD_ABOUT, DlgAboutProc);
break;
case IDM_NEXTPAGE:
if ( !lpImage )
break;
DeactivateTool();
SendMessage( lpImage->hWnd, WM_SYSCOMMAND, SC_NEXTWINDOW, 0L );
break;
case IDM_NEW:
DeactivateTool();
SoundStartResource( "magic01", NO, NULL );
AstralCursor( IDC_WAIT );
New( Control.NewWidth, Control.NewHeight, Control.NewResolution,
Control.NewDepth );
AstralCursor( NULL );
break;
case IDM_OPEN:
DeactivateTool();
/* Bring up the modal 'File Open' box */
if ( !(dwReturn = DoOpenDlg( hWindow, IDD_OPEN,
Save.FileType, szFileName, NO )) )
break;
idFileType = LOWORD( dwReturn );
Save.FileType = idFileType;
PutDefaultInt( "FileType", idFileType - IDN_TIFF );
AstralImageLoad( idFileType, szFileName, MAYBE, YES );
break;
case IDM_ALTOPEN:
DeactivateTool();
// Command line sent from a second instance prior to it closing
/* If the caller passed in a file name, try to load it or print it */
if ( !(lpszCmdLine = (LPSTR)lParam) )
break;
HandleCommandLine( hWindow, lpszCmdLine, &bPrint );
break;
case IDM_SAVE:
DeactivateTool();
HandleSaveCommand(hWindow, wID, YES);
break;
case IDM_SAVEAS:
DeactivateTool();
HandleSaveCommand(hWindow, wID, YES);
break;
case IDM_SAVESPECIAL:
DeactivateTool();
HandleSaveCommand(hWindow, wID, YES);
break;
case IDM_SAVEWALLPAPER:
DeactivateTool();
SaveWallpaper( "CRAYOLA", NO/*fTiled*/ );
break;
case IDM_REVERT:
if ( !lpImage )
break;
DeactivateTool();
if ( lpImage->fUntitled ) // If the picture doesn't have a name, get out
break;
if ( ImgChanged(lpImage) )
{
/* Check to see if its OK to trash changes */
if ( AstralOKCancel(IDS_OKTOREVERT,
(LPSTR)lpImage->CurFile) == IDCANCEL )
break;
}
lstrcpy( szFileName, lpImage->CurFile );
idFileType = lpImage->FileType;
fDoZoom = IsZoomed(lpImage->hWnd);
fHasZoom = Window.fHasZoom;
CloseImage( NO, lpImage ); // Close the active image
if ( !AstralImageLoad( idFileType, szFileName, fDoZoom, YES ) )
break;
break;
case IDM_RECALLIMAGE0:
case IDM_RECALLIMAGE1:
case IDM_RECALLIMAGE2:
case IDM_RECALLIMAGE3:
case IDM_RECALLIMAGE4:
case IDM_RECALLIMAGE5:
case IDM_RECALLIMAGE6:
case IDM_RECALLIMAGE7:
case IDM_RECALLIMAGE8:
case IDM_RECALLIMAGE9:
DeactivateTool();
GetMenuString( GetMenu(hWindow), wID,
szFileName, sizeof(szFileName), MF_BYCOMMAND );
i = 0;
while ( szFileName[i] && szFileName[i] != ' ' )
i++; // Skip over the numeric id in the string (3. junk.tif)
lstrcpy(szString, &szFileName[i+1]);
GetRecallFileName(szString);
AstralImageLoad( NULL, szString, MAYBE, YES );
break;
case IDM_PRINT:
if ( !lpImage )
break;
DeactivateTool();
AstralCursor( IDC_WAIT );
DoPrintSizeInits();
SoundStartResource( "print", YES, NULL );
PrintFile( hWindow, filename(lpImage->CurFile), YES, lpImage, NULL );
SoundStop();
AstralCursor( NULL );
break;
case IDM_PRINTSETUP:
/* Bring up the setup dialog box for the active printer */
AstralDlg( NO|2, hInstAstral, hWindow, IDD_PRINTSETUP,
DlgPrintSetupProc);
break;
case IDC_SOUND:
SoundToggle();
break;
case IDM_UNDO:
if ( !lpImage )
break;
DeactivateTool();
ImgEditUndo(lpImage, YES, NO);
break;
case IDM_CUT:
case IDM_COPY:
if ( !lpImage )
break;
DeactivateTool();
// Create the clipboard files from the image
ProgressBegin(1, IDS_PROGCOPY);
if ( !ImgWriteClipOut( lpImage, NULL, NULL, &rMask, lpImage->DataType ) )
{
ProgressEnd();
Message(IDS_EMEMALLOC);
break;
}
ProgressEnd();
OpenClipboard(hWindow);
EmptyClipboard();
// Passing a NULL data handle in SetClipboardData() means that
// the data will be requested in a WM_RENDERFORMAT message
hMem = ConstructObject( lpImage,
IsRectEmpty(&rMask)? (LPRECT)NULL : (LPRECT)&rMask );
if ( pOLE )
{ // Any data put on before Native will become staticly copied
SetClipboardData( pOLE->cfNative, NULL );
SetClipboardData( pOLE->cfOwnerLink, hMem );
}
SetClipboardData( CF_DIB, NULL );
if ( Control.DoPicture )
SetClipboardData( CF_METAFILEPICT, NULL );
if ( Control.DoBitmap )
SetClipboardData( CF_BITMAP, NULL );
SetClipboardData( CF_PALETTE, NULL );
SetClipboardData( Control.cfImage, NULL );
if ( pOLE && wID == IDM_COPY && !lpImage->fUntitled )
{ // ObjectLink is retrieved during a Paste Link...
SetClipboardData( pOLE->cfObjectLink, hMem );
}
CloseClipboard();
if ( wID == IDM_COPY )
break;
// else fall through to IDM_DELETE
case IDM_DELETE:
if ( !lpImage )
break;
{
COLORINFO ColorInfo;
DeactivateTool();
ColorInfo.gray = 255;
SetColorInfo( &ColorInfo, &ColorInfo, CS_GRAY );
TintFill( lpImage, &ColorInfo, 255, MM_NORMAL,
wID == IDM_CUT ? IDS_UNDOCUT : IDS_UNDODELETE );
}
break;
case IDM_PASTE:
if ( !lpImage )
break;
case IDM_PASTEASNEW:
if ( !OpenClipboard(hWndAstral) )
{
Message( IDS_ECLIPOPEN );
break;
}
if ( !IsClipboardFormatAvailable(CF_DIB) &&
!IsClipboardFormatAvailable(CF_BITMAP) &&
!IsClipboardFormatAvailable(Control.cfImage) )
{
Message( IDS_ECLIPOPEN );
CloseClipboard();
break;
}
CloseClipboard();
DeactivateTool();
// First put clipboard contents into a file(s)
AstralCursor(IDC_WAIT);
if ( !PasteFromClipboard( hWindow, (wID == IDM_PASTE) /*fNeedMask*/ ) )
{
AstralCursor(NULL);
Message(IDS_EMEMALLOC);
break;
}
if ( wID == IDM_PASTE )
{
ProgressBegin(1, IDS_PROGPASTECLIP);
TransformObjectsStart( YES/*fNewObject*/ );
if ( ImgCreateClipInObject( lpImage, NO ) )
;
ProgressEnd();
}
else
if ( wID == IDM_PASTEASNEW )
{
if ( lpFrame = AstralFrameLoad( Names.PasteImageFile, -1,
&idDataType, &idFileType) )
{
if ( NewImageWindow(
NULL, // lpOldFrame
NULL, // Name
lpFrame, // lpNewFrame
idFileType, // lpImage->FileType
idDataType, // lpImage->DataType
FALSE, // New view?
IMG_DOCUMENT, // lpImage->DocumentType
NULL, // lpImage->ImageName
MAYBE
) )
lpImage->fChanged = YES;
}
}
break;
case IDM_ESCAPE:
if (!lpImage)
break;
if (lpImage->hWnd == hZoomWindow)
break;
if ( Tool.bActive && Tool.lpToolProc )
DestroyProc( lpImage->hWnd, 1L );
break;
case IDM_SIZEUP:
case IDM_SIZEDOWN:
if (!Retouch.hBrush)
break;
SetFocus( hWindow ); // Take focus away from any controls
if ( Retouch.BrushShape == IDC_BRUSHCUSTOM )
break;
if ( wID == IDM_SIZEUP )
{
if( bHexBrush && ( Retouch.BrushSize % 2 == 0 ) && ( Retouch.BrushSize > 6 ))
Retouch.BrushSize += 2;
else
Retouch.BrushSize++;
}
else
{
if( bHexBrush && ( Retouch.BrushSize % 2 == 0 ) && ( Retouch.BrushSize > 6 ))
Retouch.BrushSize -= 2;
else
Retouch.BrushSize--;
}
if ( Retouch.BrushSize < 1 || Retouch.BrushSize > MAX_BRUSH_SIZE )
{
Retouch.BrushSize = bound( Retouch.BrushSize, 1,MAX_BRUSH_SIZE);
MessageBeep(0);
break;
}
if (lpImage)
DisplayBrush(0, 0, 0, OFF);
SetMgxBrushSize(Retouch.hBrush, Retouch.BrushSize);
if (lpImage && Window.hCursor == Window.hNullCursor)
DisplayBrush(lpImage->hWnd, 32767, 32767, ON);
if ( Tool.hRibbon )
SetSlide( Tool.hRibbon, IDC_BRUSHSIZE, Retouch.BrushSize );
break;
case IDM_SHAPEUP:
case IDM_SHAPEDOWN:
if (!Retouch.hBrush)
break;
SetFocus( hWindow ); // Take focus away from any controls
NewShape = Retouch.BrushShape;
if ( wID == IDM_SHAPEUP )
NewShape++;
else NewShape--;
if ( NewShape > IDC_BRUSHCUSTOM )
NewShape = IDC_BRUSHCIRCLE;
if ( NewShape < IDC_BRUSHCIRCLE )
NewShape = IDC_BRUSHCUSTOM;
if (lpImage)
DisplayBrush(0, 0, 0, OFF);
if (!SetMgxBrushShape(Retouch.hBrush, NewShape, Names.CustomBrush))
{
NewShape = IDC_BRUSHCIRCLE;
SetMgxBrushShape(Retouch.hBrush, NewShape, Names.CustomBrush);
}
Retouch.BrushShape = NewShape;
if (lpImage && Window.hCursor == Window.hNullCursor)
DisplayBrush(lpImage->hWnd, 32767, 32767, ON);
if ( Tool.hRibbon )
{
CheckComboItem( Tool.hRibbon, IDC_BRUSHSHAPE, IDC_BRUSHCIRCLE,
IDC_BRUSHCUSTOMNEW, Retouch.BrushShape );
SendMessage( Tool.hRibbon, WM_CONTROLENABLE, 0, 0L );
}
break;
case IDM_MOVEUP:
case IDM_MOVEDOWN:
case IDM_MOVELEFT:
case IDM_MOVERIGHT:
if (!lpImage)
break;
lpBase = ImgGetBase(lpImage);
if (ImgGetSelObject(lpImage, NULL) == lpBase)
break;
dx = dy = 0;
if (wID == IDM_MOVEUP)
--dy;
if (wID == IDM_MOVEDOWN)
++dy;
if (wID == IDM_MOVELEFT)
--dx;
if (wID == IDM_MOVERIGHT)
++dx;
lpObject = NULL;
while (lpObject = ImgGetSelObject(lpImage, lpObject))
{
rect = lpObject->rObject;
OffsetRect(&rect, dx, dy);
if (!AstralIntersectRect(&rTemp, &lpBase->rObject, &rect))
break;
}
if (lpObject)
break;
AstralSetRectEmpty(&rAll);
lpObject = NULL;
while (lpObject = ImgGetSelObject(lpImage, lpObject))
{
rect = lpObject->rObject;
OffsetRect(&lpObject->rObject, dx, dy);
AstralUnionRect(&rAll, &rAll, &lpObject->rObject);
if (!lpObject->Pixmap.fNewFrame &&
EqualRect(&rect, &lpObject->rUndoObject))
lpObject->rUndoObject = lpObject->rObject;
UpdateImage(&rect, TRUE);
UpdateImage(&lpObject->rObject, TRUE);
}
if (wID == IDM_MOVEUP)
{
x = (rAll.left + rAll.right)/2;
y = rAll.top;
}
else
if (wID == IDM_MOVEDOWN)
{
x = (rAll.left + rAll.right)/2;
y = rAll.bottom;
}
else
if (wID == IDM_MOVELEFT)
{
x = rAll.left;
y = (rAll.top + rAll.bottom)/2;
}
else
if (wID == IDM_MOVERIGHT)
{
x = rAll.right;
y = (rAll.top + rAll.bottom)/2;
}
File2Display(&x, &y);
AutoScroll(lpImage->hWnd, x, y);
AstralUpdateWindow(lpImage->hWnd);
DisplayInfo(-1, &rAll);
break;
case IDM_LASTTOOL:
DeactivateTool();
if ( Tool.idLast && (hWnd = AstralDlgGet(IDD_MAIN)) )
SendMessage( hWnd, WM_COMMAND, Tool.idLast, 2L);
break;
case IDM_PREF:
// prevent problems if running animations and they change
// the wave mix dll setting in preferences
StopAnimation();
AstralDlg( NO|2, hInstAstral, hWindow, IDD_PREF, DlgPrefProc );
break;
case IDC_VIEWLAST: // duplicate of function in the view ribbon
if ( !lpImage )
break;
RevertLastView();
break;
// case IDC_VIEWFULL: // duplicate of function in the view ribbon
// if ( !lpImage )
// break;
// AstralDlg( NO, hInstAstral, hWindow, IDD_VIEWFULL, DlgFullScreenViewProc );
// break;
case IDC_VIEWALL: // duplicate of function in the view ribbon
if ( !lpImage )
break;
ViewAll();
break;
case IDC_ZOOMIN: // duplicate of function in the view ribbon
if ( !lpImage )
break;
if (!lpImage->lpDisplay)
break;
if (!lpImage->lpDisplay->ViewPercentage)
break;
x = ( lpImage->lpDisplay->FileRect.left
+ lpImage->lpDisplay->FileRect.right ) / 2;
y = ( lpImage->lpDisplay->FileRect.top
+ lpImage->lpDisplay->FileRect.bottom ) / 2;
SaveLastView();
Zoom(x,y, +100, YES, ( View.ZoomWindow ^ CONTROL ) );
break;
case IDC_ZOOMOUT: // duplicate of function in the view ribbon
if ( !lpImage )
break;
if (!lpImage->lpDisplay)
break;
if (!lpImage->lpDisplay->ViewPercentage)
break;
x = ( lpImage->lpDisplay->FileRect.left
+ lpImage->lpDisplay->FileRect.right ) / 2;
y = ( lpImage->lpDisplay->FileRect.top
+ lpImage->lpDisplay->FileRect.bottom ) / 2;
SaveLastView();
Zoom(x,y, -100, YES,( View.ZoomWindow ^ CONTROL ) );
break;
case IDM_HELP:
Control.Hints = !Control.Hints;
PutDefInt (Control.Hints,Control.Hints);
break;
default:
return( FALSE );
}
return( TRUE );
}
void AnnounceWin(HWND hWnd, BOOL bWin)
{
bFinished = TRUE;
if (bWin)
SoundStartResource("GOODANSWER3", FALSE, 0);
}
