#
# TypeLibrary v1.0 for FW Standard Button
# Make by Vailton Renato, 25/04-2005.
#
TYPELIB: Dialog
PALLETE: Standard
ICON: Dialog.ico
REQUEST:
   Library:
   Include:
INTERFACE: Form
   InternalName C "DIALOG"

RESOURCE:
GROUP: General Info
  !Name          C
  !Caption       C
  !Left          N
  !Top           N
  !Width         N
  !Height        N
   Menu Name     C

GROUP: FiveWin Options
   Cargo         U                  #Standard Clipper general purpose user defined DATA
   nHelpId       N                  #The help topic identifier for this window
  !MemvarScope   N  msNone,msPublic #Configure export method for all components into this FORM
GROUP: Font & Color Style
   Background    COLOR
   Foreground    COLOR
  !Font          FONT
   FontBold      L
   FontColor     COLOR
   FontItalic    L
   FontName      FONTNAME
   FontSize      N
   FontStrikeOut L
   FontUnderLine L

GROUP: Type Specific Styles
  !Style         STYLE Popup, Overlapped, Child
   Modal$frame   STYLE DS_MODALFRAME                   *DEFAULT*
   System$Modal  STYLE DS_SYSMODAL
   Abs$alignment STYLE DS_ABSALIGN
   Context$help  STYLE DS_CONTEXTHELP
  Set$foreground STYLE DS_SETFOREGROUND
   3D$Look       STYLE DS_3DLOOK
  No$Fail$Create STYLE DS_NOFAILCREATE
  No$IDLE$Msgs   STYLE DS_NOIDLEMSG
   Control       STYLE DS_CONTROL
   Center        STYLE DS_CENTER
   Center$Mouse  STYLE DS_CENTERMOUSE
   Local$Edit    STYLE DS_LOCALEDIT                    *DEFAULT*
  !Disabled      STYLE WS_DISABLED
  !Visible       STYLE WS_VISIBLE                      *DEFAULT*

GROUP: Window Styles
   Thick$frame   STYLE WS_THICKFRAME
   WithCaption   STYLE WS_CAPTION                      *DEFAULT*
   System$menu   STYLE WS_SYSMENU
   Minimize$box  STYLE WS_MINIMIZE
   Maximize$box  STYLE WS_MAXIMIZE
   Horz$scroll   STYLE WS_HSCROLL
   Vert$scroll   STYLE WS_HSCROLL

GROUP: Extended Window Styles
   Tool$window   STYLE WS_EX_TOOLWINDOW
   Client$edge   STYLE WS_EX_CLIENTEDGE
   Transparent   STYLE WS_EX_TRANSPARENT
   Accept$Files  STYLE WS_EX_ACCEPTFILES
   Right         STYLE WS_EX_RIGHT
  Control$Parent STYLE WS_EX_CONTROLPARENT
   Context$Help  STYLE WS_EX_CONTEXTHELP
No$Parent$Notify STYLE WS_EX_NOPARENTNOTIFY

OBJECT INSPECTOR PROPERTIES:
# Eventos do objeto
OBJECT INSPECTOR EVENTS:
   Start        B                                     #Action to be performed automatically just once at start
   Init         B ( oDialog )                            #Code Block to execute on initialization
   Painted      B ( hDC, cPS, oDialog )                  #Code Block to execute when painting the Window

GROUP: Focus Control
   When         B ( )                                 #Code Block for WHEN clause
   Valid        B ( )                                 #Code Block for VALID clause
   GotFocus     B ( )                                 #Code Block to execute when receiving the focus
   LostFocus    B ( nWnd )                            #Code Block to execute when losing the focus

GROUP: Mouse Events
   Moved        B ( nRow, nCol )                      #Code Block to execute after moving the window
   Resized      B ( nSizeType, nWidth, nHeight )      #Code Block to execute after resizing a Window
   LClicked     B ( nRow, nCol, nKeyFlags, oDialog )     #Code Block to execute when left clicking with the mouse
   LDblClick    B ( nRow, nCol, nKeyFlags, oDialog )     #Code Block to execute when left double clicking the mouse
   RClicked     B ( nRow, nCol, nKeyFlags, oDialog )     #Code Block to execute when right clicking with the mouse
  !OnClick      B ( oDialog, nRow, nCol )
   LButtonUp    B ( nRow, nCol, nKeyFlags, oDialog )
   RButtonUp    B ( nRow, nCol, nKeyFlags, oDialog )
   MButtonDown  B ( nRow, nCol, nKeyFlags, oDialog )
   MButtonUp    B ( nRow, nCol, nKeyFlags, oDialog )
   MouseMoved   B ( nRow, nCol, nKeyFlags )           #Code Block to execute when moving the mouse

GROUP: Key Events
  !OnKeyDown    B ( oDialog, nKey, nFlags )              #Code Block to execute when pressing a key, with oDialog as params
   KeyDown      B ( nKey, nFlags )                    #Code Block to execute when pressing a key
   KeyChar      B ( nKey, nFlags )                    #Code Block to execute when pressing a no-control key

OUTPUT:
DEFINE DIALOG oDlg ;
 NAME <"Name"> ;
 LIBRARY WinHandle ;
 PIXEL ;
[HELP <nHelpId>]

[oDlg:Cargo := <Cargo>]

End TypeLib
