Search found 77 matches: cps

Return to advanced search

Re: Moving the dialog

... if defined from METHOD Paint() CLASS TWindow      if ValType( ::bPainted ) == "B"         uVal = Eval( ::bPainted, ::hDC, ::cPS, Self )      endif ::cPS is initialized from METHOD _BeginPaint() and contains a PAINTSTRUCT: https://learn.microsoft.com/en-us/windows/win32/api/winuser/ns-winuser-paintstruct ...
by Antonio Linares
Mon Oct 23, 2023 12:56 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: Moving the dialog
Replies: 8
Views: 472

Re: design.prg from FW samples

... a grid into printer not screen perhaps for the screen you can use this ( I coied it from forum many year ago ) It is as DrawGrid( oDlg:hWnd, hDC, cPS, 8, 8 ) //----------------------------------------------------------------------------//#pragma BEGINDUMP#include <Windows.h>#include <HbApi.h>//----------------------------------------------------------------------------//HB_FUNC( ...
by Silvio.Falconi
Sun Mar 20, 2022 3:32 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: design.prg from FW samples
Replies: 9
Views: 1357

Re: Colorize a dialog two colors

Antonio, I use it for a Panel I made oApp:oSpiaggia:bPainted:= {|hDC, cPS| ; SetDlgGradient( { { 0.1, CLR_CYAN, CLR_CYAN }, { 0.9, COLORE_SABBIA, COLORE_SABBIA } } ); } then on this tPanel I use btnbmp and ( on top ) the objects Ximage the colors are bpainted ...
by Silvio.Falconi
Wed Apr 01, 2020 9:55 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: Colorize a dialog two colors
Replies: 3
Views: 703

Re: grid printing

José,

Do you mean to print it on a window or dialog ?

If so, then please try:

oWnd:bPainted = { | hDC, cPS | DrawGrid( oWnd:hWnd, hDC, cPS, 5, 5 ) }

There is an example of use in FWH\visual\design.prg
by Antonio Linares
Sat Sep 01, 2018 11:37 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: grid printing
Replies: 3
Views: 597

Re: Bordes de xBrowse

When we create from source, the bottom-line also is drawn.
Wonder why the bottom-line is not drawn in the above case.

Any way, you may use oBrw:bPainted to draw the bottom-line yourself.

oBrw:bPainted := { |hDC, cPS, brw| yourfunction( hDC, cPC, brw ) }
by nageswaragunupudi
Fri Jan 20, 2017 5:26 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: Bordes de xBrowse
Replies: 4
Views: 862

Re: design.prg from FW samples

Otto,

In design.prg please make this change:

ACTIVATE DIALOG oDlg CENTERED ;
ON INIT ( oDlg:nOpacity := 150, PlaceControl( oDlg ) ) ;
ON PAINT If( lDesign, DrawGrid( oDlg:hWnd, hDC, cPS, 8, 8 ),) ;
ON RIGHT CLICK EditDialog( nRow, nCol, oDlg )
by Antonio Linares
Wed Jul 27, 2016 8:49 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: design.prg from FW samples
Replies: 9
Views: 1357

WINRAD

Estimados Amigos La verdad que he estado desconectado del foro mucho tiempo por que dejo de funcionar mi usuario y mi clave Bueno ya solicite la clave y ya me tienen por aca de vuelta Hace mucho tiempo atras realize un ide en fivewin desde luego tuve que agrandar la clase twindow para poder tener da...
by vzorrilla
Sun Sep 14, 2014 6:18 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: WINRAD
Replies: 1
Views: 625

Re: Bitmap Compatible

... el valor de la región a pintar insertando los valores directamente en el rcPaint de la PAINTSTRUCTURE (o como se llame) que se guarda en ::cPS, pero no consigo que funcione, pues no sé si es porque la estructura se guarda en ::cPS como string (no tene por qué), o porque rcPaint se reconfigura ...
by antolin
Fri Mar 21, 2014 8:56 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: Bitmap Compatible
Replies: 12
Views: 1683

Re: "Snap" for Clipper

...  1661  1665  1668 CPROMPT                WINDOW.PRG     1509  1509  1515  1515  1733  1734  1736  1736  1737  1769                   1770  1771 CPS                    WINDOW.PRG      434   575   575  2929  3743  3751  3752  3752 CRC                    WINDOW.PRG     2036  2038  2039  2040  2041 ...
by Antonio Linares
Sat Oct 26, 2013 9:44 am
 
Forum: Off Topic / Otros temas
Topic: "Snap" for Clipper
Replies: 7
Views: 6540

Re: cPS in bPainted

Antonio,

Antonio Linares wrote:Enrico,

You can convert from units to pixels and viceversa, so I don't see any limitation


The problem is that the pixels coordinates have to be rounded after the conversion.

EMG
by Enrico Maria Giordano
Mon Aug 26, 2013 9:20 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: cPS in bPainted
Replies: 20
Views: 2464

Re: cPS in bPainted

Enrico,

You can convert from units to pixels and viceversa, so I don't see any limitation
by Antonio Linares
Mon Aug 26, 2013 9:07 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: cPS in bPainted
Replies: 20
Views: 2464

Re: cPS in bPainted

Antonio,

I think it's not possible to use a bitmap when the grid dots have to be aligned to dialog units and not pixels, am I wrong?

EMG
by Enrico Maria Giordano
Sun Aug 25, 2013 9:33 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: cPS in bPainted
Replies: 20
Views: 2464

Re: cPS in bPainted

Antonio,

Antonio Linares wrote:Here it is :-)


Thank you. I'll study it.

EMG
by Enrico Maria Giordano
Sun Aug 25, 2013 2:28 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: cPS in bPainted
Replies: 20
Views: 2464

Re: cPS in bPainted

...  oForm:cTitle = "Form1"   oForm:nTop  = 175   oForm:nLeft = 291   // oForm:bPainted = { | hDC, cPS | DrawGrid( oForm:hWnd, hDC, cPS, 8, 8 ) }   oForm:bRClicked = { | nRow, nCol | ShowPopup( nRow, nCol ) }   oForm:bLClicked ...
by Antonio Linares
Sun Aug 25, 2013 2:25 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: cPS in bPainted
Replies: 20
Views: 2464

Re: cPS in bPainted

As the dots distance is variable we should have to create the bitmap for the brush dinamically...
by Antonio Linares
Sun Aug 25, 2013 2:13 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: cPS in bPainted
Replies: 20
Views: 2464
Next

Return to advanced search