FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour Gradient For Ordinary Button
Posts: 1
Joined: Thu Jun 11, 2009 05:06 AM
Gradient For Ordinary Button
Posted: Fri Jun 12, 2009 02:56 AM

How do I put in gradient for the following "Print" button.

function main

#include "fivewin.ch"

local oDlg
local oLbx

           DEFINE DIALOG oDlg FROM 0, 0 TO 26, 79 ;
           TITLE "Print"

@ 0.2, 21 LISTBOX oLbx FIELDS &FIL->custno,;
&FIL->name, &FIL->area,;
&FIL->agent;
HEADERS "Account No", "Name", "Area", "Agent" ;
FIELDSIZES 78, 300, 24, 24 ;
SIZE 140, 170 OF oDlg

@ 9.95, 18.7 BUTTON "&Print" OF oDlg ;
ACTION Report1() SIZE 40, 12

@ 9.95, 25.7 BUTTON "&Exit" OF oDlg ACTION oDlg:End() SIZE 40, 12

ACTIVATE DIALOG oDlg CENTERED

return nil
..................
Thanks

Regards
ACWOO
(using FWH711 + bcc55)

Continue the discussion