FiveTech Software tech support forums

... of the bitmap. |
| `nOldX`, `nOldY` | `NUMERIC` | Previous X and Y positions of the bitmap. |
| `hBitmap` | `HANDLE` | Handle to the bitmap. |
| `hPalette` | `HANDLE` | Handle to the bitmap's palette. |
| `cBmpFile` | `CHARACTER` | File path of the bitmap. |
| `cResName` | `CHARACTER` | Resource name ...

... give me error not found method ...why ?

on note .txt I found

New: Method ReadPalBmpEx( uSource, [aResize] ) class TWindow
--> { hBitmap, hPalette, nBmpWidth, nBmpHeight, lAlpha, cName, lResource }
uSource can be bmpfile, resource, any imagefile, image buffer from memory
or handle of a bitmap ...

... file name, resource name, image buffer, hBitmap, hIcon, aShape Array, Image URL on the Web, Symbol

aImage {
hBitmap (GDI ) or pImage( GDI+ ),
hPalette,
width,
height,
lHasAlphaChannel,
cSourceName,
IsFromResource,
"BITMAP/PIMAGE", // If GDI+, "PIMAGE"
nZeroZeroClr,
ImageType (BMP/JPG/PNG ...

... PalBmpDraw( ::hDC, (::nHeaderHeight - 3-if(::lgetbar,::nrowheight*2,0))*0.2, RECORDSELECTOR_WIDTH*0.2,;
::osettingbmp:hBitmap,;
::osettingbmp:hPalette,;
if(::lgetbar,::nHeaderHeight - 3-::nrowheight*2,::nheaderHeight/::nHeaderLines)*0.8,;
if(::lgetbar,::nHeaderHeight - 3-::nrowheight*2 ...

We recommend using FW_ReadImage( nil, cAnyImageSource, [aSize], [lGDIP] ) --> aImage

Elements of aImage:
{ hBitmap, hPalette, nBmpWidth, nBmpHeight, lAlpha, cName, lResource, cType, nZeroClr }

Destroy with
PalBmpFree( aImage )

... to Exit " + PA[04] + "?" ) ;
ON PAINT ( PalBmpDraw( hDC, (oWnd:nHeight/2-oBmp:nHeight/2)-50,(oWnd:nWidth/2-oBmp:nWidth/2), oBmp:hBitmap, oBmp:hPalette ) );
ON INIT ShowLogo( @oBmp, oWnd ) ;
MAXIMIZED

FUNCTION ShowLogo( oBmp, oWnd )
IF FILE( PA[03] + 'winfrt10.bmp' )
oBmp:LoadBMP( PA[03 ...

... oWnd can be any window, dialog or control.
Releasing Image: PalBmpFree( aImageInfo )

aImageInfo format { pImage/hBitmap/hIcon/hCursor/hMeta, hPalette,
nWidth, nHeight, lHasAlpha, cSource, lResource )
uSource: Can be (a) any file on disk (b) internet address of an image,
(c) Resource Name, (d ...

... nTop' wurde ein Wert zugewiesen, der nie verwendet wird in Funktion FwBmpItem(tagDRAWITEMSTRUCT *,HMENU__ *,int,HBITMAP__ *,long,long,long,int,HPALETTE__ *)
Fehler E2034 C:\\prg_allgemein\\menudraw.prg 2191: Konvertierung von 'void *' nach 'HFONT__ *' nicht möglich in Funktion FwCharItem ...

... IsAlphaChannel()
- METHOD GetRecolorColorMatrix( nRed, nGreen, nBlue )
- METHOD SetPixeltoAlpha( x, y )
- METHOD CreateFromRes( Hbitmap, hPalette )
- METHOD ConverToGray()
- METHOD ImageRotate( nDegrees, lAdjust )
- Function GetImgFromList( uResBmp, nParts, nOrd, nW, nH, nPartsV, nOrdV ...

Enrico , use WndReadPalBmpEx( Self, uBmp, aReSize ) -> aBmp // format: { hBitmap, hPalette, nBmpWidth, nBmpHeight, lAlpha, cName, lResource }
This function is in btnbmp.prg for substitution in test .
In my tests gdi+ it gives equal and often better quality than freeimage ( especially with png ) .
You ...

... Please review samples\fivedit.prg for an example of use.

* New: Method ReadPalBmpEx( uSource, [aResize] ) class TWindow
--> { hBitmap, hPalette, nBmpWidth, nBmpHeight, lAlpha, cName, lResource }
uSource can be bmpfile, resource, any imagefile, image buffer from memory
or handle of a ...

... cual trataria correctamente las propiedades necesarias, por que al realizar cambios directos del hBitmap, por ejemplo, no se estaría actualizando hPalette, o otras propiedades del bitmap, las cual se borrarían con la primer llamada al método end, entiendo que para esta ocacion es mas fácil hacerlo de ...

... PFNPROPSHEETCALLBACK pfnCallback;

#if (_WIN32_IE >= 0x0400)
union
{
HBITMAP hbmWatermark;
LPCSTR pszbmWatermark;
} DUMMYUNIONNAME4;
HPALETTE hplWatermark;
union
{
HBITMAP hbmHeader; // Header bitmap shares the palette with watermark
LPCSTR pszbmHeader;
} DUMMYUNIONNAME5;
#endif ...

... the needed changes in class TImage :

METHOD SaveImage( cFile, nFormat, nQuality ) CLASS TImage
local hDib := DibFromBitmap( ::hBitmap, ::hPalette )
local cTempFile := cTempFile()
local lSaved, lAlpha := ::HasAlpha()
DibWrite( cTempFile, hDib )
GloBalFree( hDib )
lSaved = FIConvertImageFile ...

... hMemBmp := CREATECOMPATIBLEBITMAP( hDC, nWidth, nHeight )
LOCAL hBmpOld := SELECTOBJECT( hMemDC, hMemBmp )
LOCAL hBitmap := oImg:hBitmap
LOCAL hPalette := oImg:hPalette

PALBMPDRAW( hMemDC, 0, 0, hBitmap, hPalette, nWidth, nHeight )

DO_LINES( hMemDC, hPen, nPensize, nPenColor )

SELECTOBJECT ...