**mztolo - kala masih berduka
**MODIFY CLASS ? OF "c:\program files\microsoft visual foxpro 8\samples\classes\buttons.vcx"
**anda lihat di class "buttons.vcx" ada tombol bernama "cmdCancel"
SET CLASSLIB TO "c:\program files\microsoft visual foxpro 8\samples\classes\buttons.vcx"
LOCAL oForm as Form

oForm=CREATEOBJECT('mzFORM')
oForm.Show(1)
RETURN

DEFINE CLASS mzFORM as Form
autocenter=.t.
height=400
width=590
Caption="mztolo 2005"

ADD OBJECT Tombol AS cmdCancel WITH ;
Top = 360, ;
Left = 500, ;
Height = 30, ;
Width = 80, ;
Caption = "Keluar"

PROCEDURE init
SET TALK OFF
CLEAR
ENDPROC

ENDDEFINE