Declare Sub __Save ( Property_DB ( Any ) As Property_DB_Type, Filename As String = EMPTY )

Declare Sub __Load ( Property_DB ( Any ) As Property_DB_Type, Filename As String = EMPTY )

Declare Sub __Set Overload ( Property_DB ( Any ) As Property_DB_Type, PIndex AS Long = 0, Label As String = EMPTY, Value As String = EMPTY)

Declare Sub __Set Overload ( Property_DB ( Any ) As Property_DB_Type, PIndex AS Long = 0, Label As String = EMPTY, Value As Long = 0 )

Declare Function __Set Overload ( Property_DB ( Any ) As Property_DB_Type, Label As String = EMPTY, Value As String = EMPTY ) As Property_DB_Type

Declare Sub __Set Overload ( Property_DB ( Any ) As Property_DB_Type, PIndex AS Long = 0, Label As String = EMPTY, Value As FB.Image Ptr )

Declare Function __Get ( Property_DB ( Any ) As Property_DB_Type, Label As String = EMPTY ) As Property_DB_Type

declare function __Query ( Property_DB ( Any ) as Property_DB_Type, Label As String ) As String

declare function __Echo ( Buffer As String, Caption as String ) As String

declare function __Direct ( Property_DB ( Any ) as Property_DB_Type, Property_Echo As String ) As String

declare function __Tinker ( Property_DB ( Any ) As Property_DB_Type, Property_Echo As String, Behavior As String, Label As String, Value As String = EMPTY ) As String

'declare function ucwords(Subject As String) As String

declare function __Bounds ( Property_DB ( Any ) As Property_DB_Type, Property_Echo As String ) As String

declare function __VideoDirect ( BoardDB ( Any ) As Property_DB_Type, TextureDB ( Any ) As Property_DB_Type, xscan as longint, yscan as longint, by as longint ) As longint

Declare Sub __Sort ( Property_DB ( Any ) As Property_DB_Type )

#include once ".\KSDK\Support\Property Shorthand.bas"
