Eugene Lutsenko wrote:You gave a very good demo program in Alaska, which proves that it is possible. But it does not help me to do it on your system. I did, in principle, to understand how you did it. But I can not do it.
as i say i used XOANON Lib from Simon Burford ...
XOANON use Windows API with "Pen","Brush" and Windows "DC" to paint so it is total different to Xbase++ "GRA" which use "PresSpace".
here some DllCall i have to use for the Demo
Code: Select all
DllCall("Gdi32.dll" ,DLL_STDCALL,"MoveToEx" ,;
DllCall("Gdi32.dll" ,DLL_STDCALL,"LineTo" ,;
DllCall("Gdi32.dll" ,DLL_STDCALL,"ExtFloodFill" ,;
DllCall("Gdi32.dll" ,DLL_STDCALL,"SelectObject" ,;
DllCall("Gdi32.dll" ,DLL_STDCALL,"GetStockObject" ,;
DllCall("Gdi32.dll" ,DLL_STDCALL,"BitBlt" ,;
DllCall("Gdi32.dll" ,DLL_STDCALL,"DeleteObject" ,;
DllCall("Gdi32.dll" ,DLL_STDCALL,"ExtCreatePen" ,;
DllCall("Gdi32.dll" ,DLL_STDCALL,"CreateHatchBrush" ,;
DllCall("Gdi32.dll" ,DLL_STDCALL,"CreatePatternBrush" ,;
DllCall("Gdi32.dll" ,DLL_STDCALL,"CreateSolidBrush" ,;
DllCall("Gdi32.dll" ,DLL_STDCALL,"CreateBrushIndirect" ,;
DllCall("User32.dll" ,DLL_STDCALL,"GetSysColorBrush" ,;
DllCall("Gdi32.dll" ,DLL_STDCALL,"CreateDIBPatternBrushPt" ,;
DllCall("Gdi32.dll" ,DLL_STDCALL,"CreateCompatibleBitmap" ,;
DllCall("Gdi32.dll" ,DLL_STDCALL,"CreateBitmap" ,;
DllCall("Gdi32.dll" ,DLL_STDCALL,"GetBitmapDimensionEx" ,;
DllCall("Gdi32.dll" ,DLL_STDCALL,"SetBitmapDimensionEx" ,;
DllCall("Gdi32.dll" ,DLL_STDCALL,"CreateDIBSection" ,;
DllCall("Kernel32.dll",DLL_STDCALL,"RtlMoveMemory" ,;
most of those DllCall does not have a "GRA" Equivalent so it is hard to rewrite it in "pure" Xbase++