/*[]=====================================================================[]*/
/*[]     LEADTOOLS for Windows - Version 11                              []*/
/*[]                                                                     []*/
/*[]                                                                     []*/
/*[]     Copyright (c) 1991-2000 LEAD Technologies, Inc.                 []*/
/*[]     All Rights Reserved.                                            []*/
/*[]=====================================================================[]*/

/*---(ClrSpace)----------------------------------------------------------------
  LEAD Functions Used.
      L_FileInfo
      L_InitBitmap
      L_LoadBitmap
      L_AccessBitmap
      L_GetBitmapRow
      L_ConvertColorSpace
      L_PutBitmapRow
      L_ReleaseBitmap
      L_CreatePaintPalette
      L_PaintDC
      L_FreeBitmap

  We have made the assumption that the user has the knowledge of programing
  in C and Windows.

  This example will:
  1. load the image from a file, whose name is sent through the command line,
     to a bitmap as 24 bits and allocate a 24 bit bitmap,
  2. display the image,
  3. call L_ConvertColorSpace on each image line to convert from RGB to YUV
     to CMYK etc.,
  4. re-display the image.

  Usage: CLRSPACE <filename>
  --------------------------------------------------------------------------*/
#include <windows.h>            /* Required for all Windows applications. */
#include <windowsx.h>           /* Needed for message crackers.           */
#include <memory.h>
#include <ctype.h>
#include "TCHAR.H"

#include "..\\..\\..\\include\\l_bitmap.h"     /* LEADTOOLS main header file. */
#include "..\\..\\..\\include\\l_error.h"      /* LEADTOOLS error definition header file. */
#include "ClrSpace.h"           /* Application specific header file. */

L_BOOL ExtractCommandData ( );

/*---[WinMain]---------------------------------------------------------------
  Syntax:     int PASCAL WinMain( HINSTANCE hInstance, HINSTANCE hPrevInstance,
                                                        LPSTR lpCmdLine, int nCmdShow )

  Parameters: hInstance       Current instance.
              hPrevInstance   previous instance.
              lpCmdLine       command line.
              nCmdShow        show-window type.

  Prototype:  Windows.h

  Notes:      Windows main function, calls initialization function
              and processes message loop.
  --------------------------------------------------------------------------*/
int PASCAL WinMain (HINSTANCE hInstance, HINSTANCE hPrevInstance,
                     LPSTR lpCmdLine, int nCmdShow)
{
   MSG msg;                     /* Message structure, See Windows SDK for
                                   more information. */
   UNLOCKSUPPORT();

   if (!hPrevInstance)          /* Other instances of app running? */
      if (!InitApplication (hInstance))   /* Initialize shared things.       */
         return (FALSE);        /* Exits if unable to initialize.  */

   ExtractCommandData ( );
      
   if (!InitInstance (hInstance, nCmdShow))  /* Do instance initializations. */
      return (FALSE);

   /* Acquire and dispatch messages until a WM_QUIT message is received. */
   while (GetMessage (&msg, NULL, 0, 0))
   {
      TranslateMessage (&msg);  /* Translates virtual key codes.  */
      DispatchMessage (&msg);   /* Dispatches message to window.  */
   }
   return (msg.wParam);         /* Returns the value from PostQuitMessage. */
}

/*---[InitApplication]------------------------------------------------------
  Syntax:     L_BOOL InitApplication( HANDLE hInstance )

  Parameters: hInstance    Current instance.

  Prototype:  ClrSpace.h

  Notes:      Initializes window class structure and registers window class.
  --------------------------------------------------------------------------*/
L_BOOL InitApplication (HANDLE hInstance)
{
   WNDCLASS wcWindowClass;
   wcWindowClass.style = 0;     /* Class style(s).               */
   wcWindowClass.lpfnWndProc = MainWndProc;  /* Function to retrieve messages */
   /* for windows of this class.    */
   wcWindowClass.cbClsExtra = 0;/* No per-class extra data.      */
   wcWindowClass.cbWndExtra = 0;/* No per-window extra data.     */
   wcWindowClass.hInstance = hInstance;   /* Owner.                        */
   wcWindowClass.hIcon = LoadIcon (hInstance, TEXT("LEAD"));
   wcWindowClass.hCursor = LoadCursor (NULL, IDC_ARROW);
   wcWindowClass.hbrBackground = GetStockObject (WHITE_BRUSH);
   wcWindowClass.lpszMenuName = NULL;  /* No menu. */
   wcWindowClass.lpszClassName = TEXT("LEADWClass");  /* Name. */

   /* Register the window class and return the result code. */
   return (RegisterClass (&wcWindowClass));
}
/*---[InitInstance]----------------------------------------------------------
  Syntax:     L_BOOL InitInstance( HANDLE hInstance, L_INT nCmdShow )

  Parameters: hInstance    Current instance.
              nCmdShow     Param for first ShowWindow() call.

  Prototype:  ClrSpace.h

  Notes:      Creates main window.
  --------------------------------------------------------------------------*/
L_BOOL InitInstance (HANDLE hInstance, L_INT nCmdShow)
{
   HWND hWnd;                   /* Window handle. */
   L_INT nRet;
   L_TCHAR buf[1024];
   
   memset(buf, 0, sizeof(buf));
   /* Get image information. */
   memset(&Data.FileInfo, 0, sizeof(FILEINFO));
   Data.FileInfo.uStructSize = sizeof(FILEINFO);

   if ((nRet = L_FileInfo (Data.szFilename, &Data.FileInfo, sizeof(FILEINFO),0, NULL)) != SUCCESS)
   {
      wsprintf (buf, TEXT("ERROR %d from L_FileInfo on file %s"), nRet, (LPTSTR) Data.szFilename);
      MessageBox (NULL, buf, TEXT("ERROR"), MB_OK);
      return (FALSE);
   }
   if (Data.FileInfo.BitsPerPixel != 24)
   {
      wsprintf (buf, TEXT("ERROR: Image must be 24-bit"));
      MessageBox (NULL, buf, TEXT("ERROR"), MB_OK);
      return (FALSE);
   }

   /* Set up RECT for window sizing. */
   rWndSize.top = 0;
   rWndSize.left = 0;
   rWndSize.bottom = INFOHEIGHT(&Data.FileInfo);
   rWndSize.right = INFOWIDTH(&Data.FileInfo);

   /* Create RECT to size of image plus window frame. */
   AdjustWindowRect (&rWndSize, WS_OVERLAPPEDWINDOW, FALSE);

   /* Create a main window for this application instance. */
   hWnd = CreateWindow (
                        TEXT("LEADWClass"),
                        TEXT("LEADTOOLS Sample Application"),  /* Window title                  */
                        WS_OVERLAPPEDWINDOW, /* Window style.                 */
                        CW_USEDEFAULT, /* Default horizontal position.  */
                        CW_USEDEFAULT, /* Default vertical position.    */
                        rWndSize.right - rWndSize.left,  /* Window width.                 */
                        rWndSize.bottom - rWndSize.top,  /* Window height.                */
                        NULL,   /* Overlapped windows have no parent. */
                        NULL,   /* Use the window class menu.    */
                        hInstance,  /* This instance owns this window. */
                        NULL    /* Pointer not needed.           */
      );

   if (hWnd == NULL)
      return (FALSE);           /* If window could not be created, return
                                   "failure". */

   ShowWindow (hWnd, nCmdShow); /* Show the window.       */
   UpdateWindow (hWnd);         /* Send WM_PAINT message. */

   return (TRUE);
}
/*---[MainWndProc]-----------------------------------------------------------
  Syntax:     L_INT32 EXT_FUNCTION MainWndProc( HWND hWnd, L_UINT message,
                                                WPARAM wParam, LPARAM lParam )

  Parameters: hWnd            Window handle.
              message         Type of message.
              wParam          Additional information.
              lParam          Additional information.

  Prototype:  ClrSpace.h

  Notes:      This procedure is responsible for handling window messages.
  --------------------------------------------------------------------------*/
L_INT32 EXT_FUNCTION MainWndProc (HWND hWnd, L_UINT Message, WPARAM wParam,
                                   LPARAM lParam)
{
   switch (Message)
   {
      HANDLE_MSG (hWnd, WM_CREATE, Window_OnCreate);
      HANDLE_MSG (hWnd, WM_TIMER, Window_OnTimer);
      HANDLE_MSG (hWnd, WM_COMMAND, Window_OnCommand);
      HANDLE_MSG (hWnd, WM_PALETTECHANGED, Window_OnPaletteChanged);
      HANDLE_MSG (hWnd, WM_QUERYNEWPALETTE, Window_OnQueryNewPalette);
      HANDLE_MSG (hWnd, WM_ACTIVATE, Window_OnActivate);
      HANDLE_MSG (hWnd, WM_PALETTEISCHANGING, Window_OnPaletteChanging);
      HANDLE_MSG (hWnd, WM_SYSCOLORCHANGE, Window_SysColorChange);
      HANDLE_MSG (hWnd, WM_PAINT, Window_OnPaint);
      HANDLE_MSG (hWnd, WM_DESTROY, Window_OnDestroy);
   }
   return DefWindowProc (hWnd, Message, wParam, lParam);
}
/*---[Window_OnCreate]-----------------------------------------------------
  Syntax:     BOOL Window_OnCreate(HWND hWnd, CREATESTRUCT FAR* lpCreateStruct);

  Parameters: hWnd            Window handle.
              lpCreateStruct  Windows Create Structure.

  Prototype:  ClrSpace.h

  Notes:      This procedure is responsible for handling WM_CREATE.
  --------------------------------------------------------------------------*/
BOOL Window_OnCreate (HWND hWnd, CREATESTRUCT FAR * lpCreateStruct)
{
   L_INT nRet;
   L_TCHAR buf[1024];
   UNREFERENCED_PARAMETER (lpCreateStruct);

   memset(buf, 0, sizeof(buf));

   /* Let Window_OnPaint know to start a timer. */
   fStartTimer = TRUE;

   /* Setup the first color space transformation. */

   /* Initialize the bitmap to 24-bits. */
   L_InitBitmap (&Data.Bitmap, sizeof(BITMAPHANDLE),Data.FileInfo.Width,
                 Data.FileInfo.Height, 24);

   /* Load the image to the bitmap. */
   nRet = L_LoadBitmap (Data.szFilename, &Data.Bitmap,sizeof(BITMAPHANDLE),
                        24, ORDER_BGR, NULL, NULL);

   if (nRet != SUCCESS)
   {
      wsprintf (buf, TEXT("Error %d Loading %s."), nRet, (LPTSTR) Data.szFilename);
      MessageBox (hWnd, buf, TEXT("Error"), MB_OK);
      return (FALSE);           /* Failure in creation, so return FALSE. */
   }

   FORWARD_WM_QUERYNEWPALETTE (hWnd, SendMessage);
   return (TRUE);
}
/*---[Window_OnTimer]-------------------------------------------------------
  Syntax:     VOID Window_OnTimer( HWND hWnd, UINT id );

  Parameters: hWnd            Window handle.
              id              ID of the Timer.

  Prototype:  ClrSpace.h

  Notes:      This procedure is responsible for handling WM_TIMER.
  --------------------------------------------------------------------------*/
VOID Window_OnTimer (HWND hWnd, UINT id)
{
   static HCURSOR hOrigCursor;
   UNREFERENCED_PARAMETER (id);

   nCount++;                    /* Increment the Counter */

   /* Has the image been displayed about 3 seconds? (this is reset in the
      function Window_OnPaint) */
   if (nCount == 1)
   {
      hOrigCursor = SetCursor (LoadCursor (NULL, IDC_SIZENS));
      return;
   }
   else if (nCount == 2)
   {
      SetCursor (LoadCursor (NULL, IDC_SIZENESW));
      return;
   }

   /* Kill the timer */
   KillTimer (hWnd, nTimer);
   nTimer = 0;

   /* Send Message for L_ConvertColorSpace. */
   FORWARD_WM_COMMAND (hWnd, 0, 0, 0, PostMessage);

   SetCursor (hOrigCursor);
   return;
}
/*---[Window_OnCommand]-----------------------------------------------------
  Syntax:     VOID Window_OnCommand( HWND hWnd, L_INT id, HWND hwndCtl,
                                     UINT codeNotify )

  Parameters: hWnd            Window handle.
              id              Menu item or Control ID.
              hwndCtl         0 if menu item selected, else window handle of
                              the control.
              codeNotify      1 if accelerator keystroke, else notification
                              code, such as BN_CLICKED.

  Prototype:  ClrSpace.h

  Notes:      This procedure is responsible for handling WM_COMMAND.
  --------------------------------------------------------------------------*/
VOID Window_OnCommand (HWND hWnd, L_INT id, HWND hwndCtl, UINT codeNotify)
{
   L_INT i;
   HCURSOR hCursor;
   HANDLE hBuf0;
   HANDLE hBuf1;
   L_UCHAR L_FAR *pBuf0;
   L_UCHAR L_FAR *pBuf1;
   UNREFERENCED_PARAMETER (id);
   UNREFERENCED_PARAMETER (hwndCtl);
   UNREFERENCED_PARAMETER (codeNotify);

   if (!(hBuf0 = GlobalAlloc (GMEM_MOVEABLE, Data.Bitmap.BytesPerLine * 2)))
   {
      MessageBox (hWnd, TEXT("Not Enough Memory!"), TEXT("ERROR"), MB_OK);
      return;
   }
   pBuf0 = (L_UCHAR L_FAR *) GlobalLock (hBuf0);
   if (!(hBuf1 = GlobalAlloc (GMEM_MOVEABLE, Data.Bitmap.BytesPerLine * 2)))
   {
      MessageBox (hWnd, TEXT("Not Enough Memory!"), TEXT("ERROR"), MB_OK);
      return;
   }
   pBuf1 = (L_UCHAR L_FAR *) GlobalLock (hBuf1);

   hCursor = SetCursor (LoadCursor (NULL, IDC_WAIT));

   L_AccessBitmap (&Data.Bitmap);

   SetWindowText (hWnd, TEXT("Rotating RGB -> HLS -> CMYK -> HSV -> YUV -> RGB Color Spaces..."));
   for (i = 0; i < Data.Bitmap.Height; i++)
   {
      L_GetBitmapRow (&Data.Bitmap, pBuf0, i, Data.Bitmap.BytesPerLine);
      L_ConvertColorSpace (pBuf0,
                           pBuf1,
                           Data.Bitmap.Width,
                           CCS_RGB,
                           CCS_HLS);
      _fmemset (pBuf0, 0, Data.Bitmap.BytesPerLine * 2);
      L_ConvertColorSpace (pBuf1,
                           pBuf0,
                           Data.Bitmap.Width,
                           CCS_HLS,
                           CCS_CMYK);
      _fmemset (pBuf1, 0, Data.Bitmap.BytesPerLine * 2);
      L_ConvertColorSpace (pBuf0,
                           pBuf1,
                           Data.Bitmap.Width,
                           CCS_CMYK,
                           CCS_HSV);
      _fmemset (pBuf0, 0, Data.Bitmap.BytesPerLine * 2);
      L_ConvertColorSpace (pBuf1,
                           pBuf0,
                           Data.Bitmap.Width,
                           CCS_HSV,
                           CCS_YUV);
      _fmemset (pBuf1, 0, Data.Bitmap.BytesPerLine * 2);
      L_ConvertColorSpace (pBuf0,
                           pBuf1,
                           Data.Bitmap.Width,
                           CCS_YUV,
                           CCS_RGB);
      _fmemset (pBuf0, 0, Data.Bitmap.BytesPerLine * 2);
      L_PutBitmapRow (&Data.Bitmap, pBuf1, i, Data.Bitmap.BytesPerLine);
   }

   L_ReleaseBitmap (&Data.Bitmap);
   GlobalUnlock (hBuf1);
   GlobalFree (hBuf1);
   GlobalUnlock (hBuf0);
   GlobalFree (hBuf0);

   SetWindowText (hWnd, TEXT("Rotated Color Spaces, Example Is Complete."));
   FORWARD_WM_QUERYNEWPALETTE (hWnd, SendMessage);

   /* Force a repaint to see the change. */
   InvalidateRect (hWnd, NULL, TRUE);

   SetCursor (hCursor);

   return;
}
/*----(Window_OnPaletteChanged)--------------------------------------------
  Syntax:     VOID Window_OnPaletteChanged( HWND hWnd, HWND hWndPaletteChange )

  Parameters: hwnd                 Handle to a window.
              hWndPaletteChange    Handle to a window that has the palette
                                   realized.

  Prototype:  ClrSpace.h

  Notes:      This procedure is responsible for handling WM_PALETTECHANGED.
--------------------------------------------------------------------------*/
VOID Window_OnPaletteChanged (HWND hWnd, HWND hWndPaletteChange)
{
   HDC hDC;
   HPALETTE hPalette;
   /* If this window initiated the palette change, do nothing. */
   if (hWnd == hWndPaletteChange)
      return;
   /* Delete the previous palette, if there is one. */
   if (Data.hPalette)
   {
      DeleteObject (Data.hPalette);
      Data.hPalette = NULL;
   }

   /* Does this window have a bitmap and a palette? */
   if (Data.Bitmap.Flags.Allocated)
   {
      hDC = GetDC (hWnd);

      /* Generate a new logical palette (if needed) for painting. */
      Data.hPalette = L_CreatePaintPalette (hDC, &Data.Bitmap);

      /* Select and Realize the palette. */
      hPalette = SelectPalette (hDC, Data.hPalette, TRUE);
      RealizePalette (hDC);

      /* Force a repaint. */
      InvalidateRect (hWnd, NULL, FALSE);

      /* Return the old palette. */
      SelectPalette (hDC, hPalette, TRUE);

      ReleaseDC (hWnd, hDC);
   }
   return;
}
/*----(Window_OnQueryNewPalette)--------------------------------------------
  Syntax:     BOOL Window_OnQueryNewPalette( HWND hWnd )

  Parameters: hWnd          Handle to a window.

  Prototype:  ClrSpace.h

  Notes:      This procedure is responsible for handling WM_QUERYNEWPALETTE.
--------------------------------------------------------------------------*/
BOOL Window_OnQueryNewPalette (HWND hWnd)
{
   HDC hDC;
   HPALETTE hPalette;
   L_INT nNoColors = 0;
   /* Delete the previous palette, if there is one. */
   if (Data.hPalette)
   {
      DeleteObject (Data.hPalette);
      Data.hPalette = NULL;
   }

   if (Data.Bitmap.Flags.Allocated)
   {
      hDC = GetDC (hWnd);

      /* Generate a new logical palette (if needed) for painting. */
      Data.hPalette = L_CreatePaintPalette (hDC, &Data.Bitmap);

      if (Data.hPalette)        /* Is a palette needed? */
      {
         hPalette = SelectPalette (hDC, Data.hPalette, FALSE);
         nNoColors = RealizePalette (hDC);

         if (nNoColors)         /* If the palette changed, force a WM_PAINT */
            InvalidateRect (hWnd, NULL, FALSE);

         /* Restore the old palette. */
         SelectPalette (hDC, hPalette, TRUE);
      }
      ReleaseDC (hWnd, hDC);
   }
   return (nNoColors);
}

/*---[Window_OnActivate]-----------------------------------------------------
  Syntax:     VOID  Window_OnActivate(HWND hwnd, UINT state, HWND hwndActDeact, 
                                      BOOL fMinimized)
  Parameters: hWnd            Window handle.
              state           WA_ACTIVE | WA_CLICKACTIVE | WA_INACTIVE    
              hwndActDeact    the winodw habdle that deactivate
              fMinimized      Window is minimized

  Prototype:  Color.h

  Notes:      This procedure is responsible for handling WM_ACTIVATE.
  --------------------------------------------------------------------------*/
VOID Window_OnActivate(HWND hwnd, UINT state, HWND hwndActDeact, BOOL fMinimized)
{
   if(state!=WA_INACTIVE)
      Window_OnQueryNewPalette (hwnd);
}

/*====(Window_OnPaletteChanging)==========================================
Description: Enumerates all child windows and asks them to realize their
             logical palettes beside the physical palette.

Syntax     : VOID Window_OnPaletteChanging(HWND hwnd, HWND hWndPaletteChange)

Parameters : hwnd                 Handle to a window.
             hWndPaletteChange    Handle to a window that has the palette
                                  realized.

Return Value: None.
==========================================================================*/
VOID  Window_OnPaletteChanging(HWND hWnd, HWND hWndPaletteChange)
{
   Window_OnPaletteChanged (hWnd, hWndPaletteChange);
}

/*====(Window_SysColorChange)==========================================
  Syntax:     VOID Window_SysColorChange( HWND hWnd )

  Parameters: hWnd          Handle to a window.

  Prototype:  Loadsave.h

  Notes:      This procedure is responsible for handling WM_SYSCOLORCHANGE.
--------------------------------------------------------------------------*/
VOID Window_SysColorChange(HWND hwnd)
{
   Window_OnQueryNewPalette (hwnd);
}

/*---[Window_OnPaint]-------------------------------------------------------
  Syntax:     VOID Window_OnPaint( HWND hWnd );

  Parameters: hWnd            Window handle.

  Prototype:  ClrSpace.h

  Notes:      This procedure is responsible for handling WM_PAINT.
  --------------------------------------------------------------------------*/
VOID Window_OnPaint (HWND hWnd)
{
   HDC hdc;
   RECT rc;
   PAINTSTRUCT ps;
   HPALETTE hOldPal = NULL;
   hdc = BeginPaint (hWnd, &ps);/* Get DC */

   if (Data.Bitmap.Flags.Allocated) /* Do we have an image? */
   {
      if (Data.hPalette)        /* Is there a palette that needs to be
                                   selected? */
         hOldPal = SelectPalette (hdc, Data.hPalette, TRUE);  /* Select it. */

      /* Setup the Destination Rectangle. */
      SetRect (&rc, 0, 0, BITMAPWIDTH(&Data.Bitmap), BITMAPHEIGHT(&Data.Bitmap));

      /* Paint it */
      L_PaintDC (hdc,
                 &Data.Bitmap,
                 NULL,
                 NULL,
                 &rc,
                 &ps.rcPaint,
                 SRCCOPY);

      if (Data.hPalette)        /* Return old palette if there is one. */
         SelectPalette (hdc, hOldPal, TRUE);

      if (fStartTimer)
      {
         fStartTimer = FALSE;
         /* Reset the counter and start a timer to be used for display delay. */
         nTimer = SetTimer (hWnd, 1, 1000, NULL);
         nCount = 0;

         if (!nTimer)
         {
            MessageBox (hWnd, TEXT("No Timers Are Available!"),
                        TEXT("ERROR - Resources"), MB_OK);

            /* No timers are available, so quit the application. */
            FORWARD_WM_DESTROY (hWnd, PostMessage);
         }
      }
   }
   EndPaint (hWnd, &ps);        /* Return DC */
   return;
}
/*---[Window_OnDestroy]----------------------------------------------------
  Syntax:     VOID Window_OnDestroy( HWND hWnd );

  Parameters: hWnd            Window handle.

  Prototype:  ClrSpace.h

  Notes:      This procedure is responsible for handling WM_DESTROY.
  --------------------------------------------------------------------------*/
VOID Window_OnDestroy (HWND hWnd)
{
   UNREFERENCED_PARAMETER (hWnd);

   if (Data.Bitmap.Flags.Allocated) /* Do we have an image? */
      L_FreeBitmap (&Data.Bitmap);

   if (Data.hPalette)           /* Delete palette if there is one. */
      DeleteObject (Data.hPalette);

   PostQuitMessage (0);         /* Post WM_QUIT, to end the application. */
   return;
}

/*---[ExtractCommandData]----------------------------------------------------
  Syntax:     L_BOOL ExtractCommandData( );

  Parameters: None.

  ProtoType:  Color.c

  Notes:    - This procedure is responsible for extracting the file 
              name passed through the command line.
            - You should call this function only in WinMain function.
  --------------------------------------------------------------------------*/
L_BOOL ExtractCommandData ( )
{

   LPTSTR pszFirst   = NULL;
   LPTSTR pszCmdLine = NULL;
   LPTSTR psz        = NULL;
   L_INT  nFirstPos  = 0 ;
   L_INT  nStringLen = 0 ;

   
   pszCmdLine = GetCommandLine();

   nStringLen = lstrlen ( pszCmdLine ) + 1 ;

   // To specify that it is command line or not.
   if(( pszCmdLine[1] == ':' ) || // Shortcut case
      ( pszCmdLine[2] == ':' )) //VS case
   {
      // 1- TRY TO EXPOSE THE EXE NAME FROM THE COMMAND LINE 
      psz = _tcschr ( pszCmdLine, ':' ) ;
   
      if ( NULL == psz )
      {
         return FALSE ;
      }
   }
   else
   {
      psz = pszCmdLine ;
   }
   
   pszFirst = _tcschr ( psz + 1, ':' ) ;

   if ( NULL == pszFirst )
   {
      return FALSE ;
   }

   // Calc the char number to the image file name.
   nFirstPos = pszFirst - pszCmdLine - 1 ;

   if ( 0 > nFirstPos )
   {
      return FALSE ;
   }

   memset (Data.szFilename, 0, sizeof(Data.szFilename));
   
   lstrcpyn ( Data.szFilename, pszFirst - 1, ( nStringLen - nFirstPos ) ) ;
 
   return TRUE;
}