TOvcCustomSimpleField

type TOvcCustomSimpleField = class(TOvcBaseEntryField)

protected

  FSimpleDataType: TSimpleDataType;

  FPictureMask: AnsiChar;

  function sfGetDataType();

  procedure sfResetFieldProperties();

  procedure sfSetDefaultRanges;

  procedure CreateWnd; override;

  procedure efEdit(); override;

  function efGetDisplayString(); override;

  procedure efIncDecValue(); override;

  function efTransfer(); override;

  procedure sfSetDataType(); virtual;

  procedure sfSetPictureMask(); virtual;

public

  procedure Assign(); override;

  constructor Create(); override;

  function efValidateField; override;

  property DataType: TSimpleDataType; [rw]

  property PictureMask: AnsiChar; [rw]

end;

TOvcCustomSimpleField

TOvcBaseEntryField

TOvcCustomControlEx

TOvcCustomControl

TObject