*******************************************************************
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 |
---|