New GdiPlus Classes for FWH 11.10

[Antonio Linares]

Here you have a working example following the Microsoft GdiPlus tutorials:
http://msdn.microsoft.com/en-us/library/ms533895(v=VS.85).aspx

Code: Select all  Expand view

// GdiPlus example following Microsoft tutorial:
// http://msdn.microsoft.com/en-us/library ... 95(v=VS.85).aspx

#include "FiveWin.ch"

function Main()

   local oWnd
   
   DEFINE WINDOW oWnd
   
   ACTIVATE WINDOW oWnd ;
      ON PAINT DrawLine( hDC )

return nil

function DrawLine( hDC )

   local oGraphics := Graphics():New( hDC )
   local oPen := Pen():New( 255, 0, 0, 255 ) // nTransparency, nRed, nGreen, nBlue
   
   oGraphics:DrawLine( oPen, 0, 0, 200, 100 )
   
return nil  

[James Bott]

Antonio,

Please explain where hDC comes from. It doesn't seem to be defined and yet it is being passed. How does this work?

Regards,
James

[nageswaragunupudi]

Mr James
Please review the command translate of ACTIVATE WINDOW or examine the PPO. Your doubt will be clarified.

[Enrico Maria Giordano]

Antonio,

Please explain where hDC comes from. It doesn't seem to be defined and yet it is being passed. How does this work?

Regards,
James

It's automatically passed by PAINT method.

EMG

[James Bott]

Rao and Enrico,

Thanks. I see it in the fivewin.ch file. A codeblock of course. I should have figured that out--I need some sleep.

Regards,
James