How get content of a FireImage Control

[Israel Vega Alvarez]

I need save a record with CHEETAH2 database  memo field  (type Z). 
I am using a FireImage Control.  How I can get the content of image?

[Israel Vega Alvarez]

If I open a bmp file or any image this is working fine:

Code Select Expand


buf_image&=freefile
Open "image.bmp" For Binary As #buf_image&
content_image$=Space$(Lof(buf_image&))
Get #buf_image&,1,content_image$
Close #buf_image&

SendMessage HWND_INICIO_FIREIMAGE1, %FIREIMAGE_SETIMAGENORMAL, %FIREIMAGE_LOADSTRING, VarPtr(content_image$)
SendMessage HWND_INICIO_FIREIMAGE1,  %FIREIMAGE_SETFITSTYLE,0, %TRUE


But I not know how extract the content from a FireImage control to a String...only from a image file to FireImage control.

Please if anyone can tell me how.