*******************************************************************
Confidential Trade Secret.
Copyright (c) 1997 Data Access Corporation, Miami Florida
All rights reserved.
DataFlex is a registered trademark of Data Access Corporation.
*******************************************************************
File       : dfbitmap.pkg
Version    : 2.0
Created    : 10/10/96
Author     : Michael Salzlechner / John Tuohy
Creates    : BitMapContainer Class
Rem        : Bitmap the filename of a
: bitmap in MS-Windows BMP-Format.
: This class will automatically display
: the stored bitmap when finding a record
: Mouseclick on the object starts a common
: filedialog to set a new bitmap
Object xxx is a BitMapContainer
Set Size to height width
Set Location to column row
Set Bitmap to "bitmapname.bmp"
Set Bitmap_Style to Style
Set Allow_Select_Bitmap_State to True | False
Set Dialog_Caption to "Name of for common file dialog"
Set Initial_Folder to "intitial file directory"
End_object
Bitmap-styles are BITMAP_ACTUAL
BITMAP_STRETCH
BITMAP_TILE
CENTER
Function Select_Bitmap returns string
By default this pops up a common file dialog allowing user to
select a bitmap. This is suitable for augmentation. Return the
file name of the bitmap to use. Invoked by Invoke_Select_Bitmap.
*******************************************************************
Dfbitmap.pkg  (view source)- import declarations
			
 - BitmapContainer : Container3D
Construct_Object()
			- Integer
Changed_State - Integer
Allow_Select_Bitmap_StateIf true, double click sends Get Select_Bitmap which invokes
an open file dialog
 - String
Dialog_Captiontitle for common file dialog
 - String
Initial_Folderstart-up directory for common file dialog
 
Add_Focus(Integer Obj)
			Although this is not a client it should add child objects to
the focus tree. Should only be textboxes!
- string
Select_Bitmap()
			Popup an open file dialog and select a bitmap file. Returns file
name
- String
sFileName - String
sPropVal - Integer
iRet - Integer
hoOpenFile 
 
Invoke_Select_Bitmap()
			Purpose: Public message to cause bitmap selection dialog to
appear and, if selected, displays the bitmap.
Ken Ross 11/15/96 10:03PM
- String
sFileName 
Mouse_Click(integer i1 integer i2)
			Augmented to invoke the filedialog to retrieve a new bitmap
Page_Object(Integer iState)
			
RequestAddToolTip()
			Called by Page_Object. Handles tooltip creation. We use a dedicated
method to perform AddToolTip because it is often the case that Page_Object
is implemented in a mixin class.
RequestDeleteToolTip()
			Called by Page_Object. Handles tooltip removal.
 
References (2):
Field References (0):
| Module | Containing Symbol | Line | 
|---|