Displays the GIF Web tuner dialog box, and gets tuning options used by LBitmapBase::ColorRes, LBitmapBase::Fill, LBitmapBase::Save, LBitmapRgn::SetRgnColorRGBRange.
#include "ltwrappr.h"
virtual L_INT LDialogWeb::DoModalGIFWebTuner (hWndOwner)
Handle of the window which owns the dialog.
| Value | Meaning |
|---|---|
| SUCCESS_DLG_OK | The "OK" button was pressed, and the dialog exited successfully. |
| SUCCESS_DLG_CLOSE | The "Close" button was pressed, and the dialog exited successfully. |
| SUCCESS_DLG_CANCEL | The "Cancel" button was pressed, and the dialog exited successfully. |
| < 1 | An error occurred. Refer to Return Codes. |
LDialogWeb::SetGIFWebTunerParams must be called before using this function to sets the initial values for the dialog. You can get the updated GIFWEBTUNERDLGPARAMS with the values entered by the user through the dialog by using LDialogWeb::GetGIFWebTunerParams.
// Example 1L_INT LDialogWeb_DoModalGIFWebTunerExample_1(LBitmap * pBitmap, HWND hWnd){L_INT nRet = 0;LDialogWeb DlgWeb;GIFWEBTUNERDLGPARAMS DlgParams;DlgWeb.SetBitmap (pBitmap);memset ( &DlgParams, 0, sizeof ( GIFWEBTUNERDLGPARAMS ) ) ;nRet = LDialogWeb::Initialize (0);if(nRet != SUCCESS)return nRet;DlgParams.uStructSize = sizeof ( GIFWEBTUNERDLGPARAMS ) ;DlgParams.pBitmap = pBitmap->GetHandle();DlgParams.uDlgFlags = DLG_GIFWEBTUNER_SHOW_EXPORT|DLG_GIFWEBTUNER_SHOW_INFORMATION |DLG_GIFWEBTUNER_SHOW_TOOL_COLORPICKER |DLG_GIFWEBTUNER_SHOW_TRANSPARENCY |DLG_GIFWEBTUNER_SHOW_OPTIONS |DLG_GIFWEBTUNER_SHOW_ADDWINDOWCOLOR ;nRet = DlgWeb.SetGIFWebTunerParams(&DlgParams) ;if(nRet != SUCCESS)return nRet;nRet = DlgWeb.DoModalGIFWebTuner(hWnd);if(nRet < 1)return nRet;// Gets the updated values for the structurenRet = DlgWeb.GetGIFWebTunerParams(&DlgParams, sizeof(DlgParams)) ;if(nRet != SUCCESS)return nRet;nRet = LDialogWeb::Free ();if(nRet != SUCCESS)return nRet;return SUCCESS;}// Example 2static COLORREF AddTolerance ( COLORREF crColor, L_INT nTolerance ){L_INT nRed ;L_INT nGreen ;L_INT nBlue ;nRed = max ( min ( ( L_INT ) GetRValue ( crColor ) + nTolerance, 255 ), 0 ) ;nGreen = max ( min ( ( L_INT ) GetGValue ( crColor ) + nTolerance, 255 ), 0 ) ;nBlue = max ( min ( ( L_INT ) GetBValue ( crColor ) + nTolerance, 255 ), 0 ) ;return RGB ( nRed, nGreen, nBlue ) ;}L_INT ExportBitmap (L_TCHAR * szFileName, LBitmapBase *pLBitmap, LPGIFWEBTUNERDLGPARAMS pParam ){L_INT nRet;{// TRANSPERANCYif ( pParam->bTransparent ){COLORREF crTransparentStart ;COLORREF crTransparentEnd ;crTransparentStart = AddTolerance ( pParam->crTransparent,- pParam->nTransparencyTolerance ) ;crTransparentEnd = AddTolerance ( pParam->crTransparent,pParam->nTransparencyTolerance ) ;// resetnRet = pLBitmap->Region()->Free ();if(nRet != SUCCESS)return nRet;// set attributespLBitmap->EnablePlayBackTransparency(TRUE);pLBitmap->SetPlayBackTransparentColor (pParam->crTransparent);// replace colorsif ( pParam->nTransparencyTolerance >= 0 ){pLBitmap->Region()->SetRgnCombineMode (L_RGN_SET);nRet = pLBitmap->Region()->SetRgnColorRGBRange (crTransparentStart, crTransparentEnd) ;if(nRet != SUCCESS)return nRet;if ( pLBitmap->HasRgn () ){nRet = pLBitmap->Fill (pParam->crTransparent);if(nRet != SUCCESS)return nRet;}nRet = pLBitmap->Region()->Free ();if(nRet != SUCCESS)return nRet;}}}// TRANSPERANCY{// COLOR RESOLUTIONL_UINT32 uFlags ;if ( ( 24 != pParam->nBitsPerPixel ) || ( 0 != pParam->nPalType ) ){uFlags = ( ( pParam->bAddWindowsColors ) && ( CRF_OPTIMIZEDPALETTE == pParam->nPalType ) ) ? CRF_IDENTITYPALETTE : 0 ;uFlags |= pParam->nDitherType ;uFlags |= pParam->nPalType ;nRet = pLBitmap->ColorRes (pParam->nBitsPerPixel,uFlags,NULL,NULL,pParam->nNumOfColors) ;if(nRet != SUCCESS)return nRet;}}// COLOR RESOLUTION{// SAVE TO DISKSAVEFILEOPTION SaveOptions ;memset ( &SaveOptions, 0, sizeof ( SAVEFILEOPTION ) ) ;SaveOptions.uStructSize = sizeof(SAVEFILEOPTION );if ( pParam->bInterlaced )SaveOptions.Flags = ESO_INTERLACED ;nRet = pLBitmap->Save(szFileName,FILE_GIF,pParam->nBitsPerPixel,0, 0,&SaveOptions ) ;if(nRet != SUCCESS)return nRet;}// SAVE TO DISKreturn SUCCESS;}L_INT LDialogWeb_DoModalGIFWebTunerExample_2(LBitmap * pBitmap, HWND hWnd){L_INT nRet = 0;LDialogWeb DlgWeb;GIFWEBTUNERDLGPARAMS DlgParams;DlgWeb.SetBitmap (pBitmap);memset ( &DlgParams, 0, sizeof (GIFWEBTUNERDLGPARAMS) ) ;nRet = LDialogWeb::Initialize (0);if(nRet != SUCCESS)return nRet;DlgParams.uStructSize = sizeof (GIFWEBTUNERDLGPARAMS) ;DlgParams.uDlgFlags = DLG_GIFWEBTUNER_SHOW_INFORMATION |DLG_GIFWEBTUNER_SHOW_TOOL_COLORPICKER |DLG_GIFWEBTUNER_SHOW_TRANSPARENCY |DLG_GIFWEBTUNER_SHOW_OPTIONS |DLG_GIFWEBTUNER_SHOW_ADDWINDOWCOLOR ;DlgWeb.EnablePreview(TRUE);DlgWeb.EnableToolbar(TRUE);DlgWeb.EnableCallBack (FALSE);nRet = DlgWeb.SetGIFWebTunerParams (&DlgParams) ;if(nRet != SUCCESS)return nRet;nRet = DlgWeb.DoModalGIFWebTuner(hWnd);if(nRet < 1)return nRet;// Gets the updated values for the structureDlgWeb.GetGIFWebTunerParams(&DlgParams, sizeof(DlgParams)) ;if ( SUCCESS_DLG_OK == nRet ){nRet = ExportBitmap (MAKE_IMAGE_PATH(TEXT("tuned.gif")), pBitmap, &DlgParams ) ;if(nRet != SUCCESS)return nRet;}nRet = LDialogWeb::Free ();if(nRet != SUCCESS)return nRet;return SUCCESS;}