Module Dbbitmap.pkg

******************************************************************* Confidential Trade Secret. Copyright (c) 1997 Data Access Corporation, Miami Florida All rights reserved. DataFlex is a registered trademark of Data Access Corporation. ******************************************************************* File : dbBitmap.pkg Version : 2.0 Created : 10/10/96 : DbBitmap class - data aware bitmap container Author : Michael Salzlechner / John Tuohy 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 : File name is bmap is stored and retrieved from appropriate data-fill Object xxx is a dbBitMap entry_Item File.Field // name of bitmap Set Size to height width Set Location to column row Set Store_with_Pathname_State to True|False Set NoPut_State to True |False 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 BITMAP_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 double click. ******************************************************************* 2/26/2002 JJT - 8.2 clean up (indirect_file, local, self, etc.)

Dbbitmap.pkg (view source)
• import declarations
  • Dfbitmap.pkg (view source)
  • nesting.pkg (view source)
  • navigate.pkg (view source)
  • Server.pkg (view source)
  • refmodes.pkg (view source)
    refresh mode constants
• dbBitmap : BitmapContainer
  • Construct_Object()
    Inherited from BitmapContainer
    • integerPrivate.Data_File
    • integerPrivate.Data_Field
    • IntegerStore_With_Pathname_State
      This Property indicates if we should store the full pathname
    • IntegerNoPut_State
      indicates if this should be a noput field just like items
  • integerValidate_Items(Integer Fg)
    It is unlikely you'll need to validate "items" in this bitmap class but you could...
  • Entry_Display(integer file# integer flag)
    created for EntItem simulation and Server support: if file# = 0, display only if Target_File is in Done-array else display only if file# = Target_File
    • IntegerdFile
    • IntegerdField
    • StringsVal
  • Entry_Clear(integer file#)
    created for EntItem simulation: file# <> 0 means use Cleared-array
  • Entry_Clear_All(integer file#)
    created for EntItem simulation:
  • Entry_Update(integer file# integer flag)
    created for EntItem simulation and Server support Normally entry_update gets called during saves and finds. When Save: file# = 0 flag = 3 Find: file# <> 0 flag = 1 Allow Update Rules: if Save update (file#=0, flag=3) Allow Update if not noput and Target_File is in Done-array and (new record or changed_state). else if Find_Update (file#=Target_File, Flag=1) or misc (file#=0) perform update Modified so that an unchanged item is moved to the field if the main file is a new record.
    • IntegerdFile
    • IntegerdField
    • IntegerC_Item
    • IntegerSrvr#
    • Integerok
    • IntegeriStat
    • StringsValue
  • Read_Data()
    the read_data-message is sent when displaying a record (Entry_Display)
    • Stringfieldvalue
    • IntegerdFile
    • IntegerdField
  • Clear_Data()
    the clear_data-message is sent when attempting to clear the screen
  • Write_Data()
    the write_data-message is sent when saving a record (Entry_Update)
    • Stringfname
    • IntegerdFile
    • IntegerdField
  • Bind_Data(integer File# Integer Field#)
  • IntegerData_File(Integer Itm#)
  • Set(integer item# integer File#)
    Inherited from server_mixin
  • IntegerData_Field(Integer Itm#)
  • Set(integer item# integer Field#)
    Inherited from server_mixin
  • Refresh(integer notifyMode)
  • Update_Dependent_Items()
  • integerItem_Count()

References (1):

Field References (0):