Gradient For Ordinary Button

[harbourbcc]

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)