2002-07-15 07:00

' Bold Font for Button
     $INCLUDE "Rapidq.inc"
     DIM font AS QFONT
     font.name="Arial"
     font.addstyles=0
' or
' Font.Bold=1
     CREATE Form AS QFORM
      CAPTION = "Form1"
      Width = 125
      Height = 82
      Center
      CREATE Button1 AS QBUTTON
       CAPTION = "BOLD"
       Left = 11
       font=font
       Top = 9
      END CREATE
     END CREATE
     Form.SHOWMODAL

2002-07-15 07:00