FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour Show Dots
Posts: 3107
Joined: Fri Oct 07, 2005 06:28 PM
Show Dots
Posted: Mon Nov 17, 2008 10:14 AM

When I show dots for a get or say class I wish show circles dots and not windows black dots
Someone Know How change showdots method from control.prg ?

Best Regards, Saludos



Falconi Silvio
Posts: 389
Joined: Mon Oct 13, 2008 11:26 AM
Show Dots
Posted: Mon Nov 17, 2008 03:39 PM

Try: Chr(144) I hope it can help you ;)

Email: SamirSSabreu@gmail.com
xHarbour 1.2.3 + Fwhh 20.2
Posts: 3107
Joined: Fri Oct 07, 2005 06:28 PM
Show Dots
Posted: Mon Nov 17, 2008 05:17 PM

sorry but perhaps YOU not Understand what I am talking

Best Regards, Saludos



Falconi Silvio
Posts: 310
Joined: Sun Jan 08, 2006 10:09 PM
Show Dots
Posted: Mon Nov 17, 2008 09:32 PM

Show Us! put an image sample.

Posts: 3107
Joined: Fri Oct 07, 2005 06:28 PM
Show Dots
Posted: Wed Nov 19, 2008 10:45 AM
I wish make it :



I made a Box class but I have



Some can help me ?



[/img]
Best Regards, Saludos



Falconi Silvio
Posts: 310
Joined: Sun Jan 08, 2006 10:09 PM
Show Dots
Posted: Wed Nov 19, 2008 01:00 PM
Try BRUSH in CheckDots method:

METHOD CheckDots() CLASS TControl
...
   DEFINE CURSOR oSizeNWSE SIZENWSE
   DEFINE CURSOR oSizeNESW SIZENESW
   DEFINE CURSOR oSizeNS   SIZENS
   DEFINE CURSOR oSizeWE   SIZEWE

   DEFINE BRUSH oDotBrush FILENAME "dot.bmp"

   DEFINE WINDOW oDot1 OF oWndParent;
      STYLE nOr( WS_CHILD, WS_CLIPSIBLINGS );
      FROM 0, 0 TO 2, 2 PIXEL ;
      COLOR "N/N" ;
      CURSOR oSizeNWSE BRUSH oDotBrush

   DEFINE WINDOW oDot2 OF oWndParent;
      STYLE nOr( WS_CHILD, WS_CLIPSIBLINGS ) ;
      FROM 0, 0 TO 2, 2 PIXEL ;
      COLOR "N/N" ;
      CURSOR oSizeNS BRUSH oDotBrush
...
Posts: 3107
Joined: Fri Oct 07, 2005 06:28 PM
Show Dots
Posted: Wed Nov 19, 2008 01:34 PM

you have try it ?

Best Regards, Saludos



Falconi Silvio

Continue the discussion