Thomas,
Did you notice in our recently closed dialog that I used edit controls for entering positive integer values?
I did so because the standard minimum, maximum and digit check of integer and real control return note boxes where the labels written in native language are embedded in the prefixed English language sentences. This behavior goes back to Visual Prolog 4 where a tree contained the obligatory and optional properties of the controls.
Versions from #6 use pfc procedures. A new feature is the distinction of
class integerControl :integerControlconstructors
new :(containerWindow ParentContainer).
% @short The constructor.% @detail Creates a new integerControl object with the specified% parent container.% @endconstructors
new :().
% @short The constructor.% @detail Creates a new integerControl object without a parent container.% @endconstants
errorMessage_illegalValue ="% must be an integer number".
errorMessage_illegalValueMandatory ="% must be specified".
errorMessage_illegalValueMinimumMaximum ="% must be between % and %".
errorMessage_illegalValueMinimum ="% must be greater than %".
errorMessage_illegalValueMaximum ="% must be less than %".
% @short These error messages are used by integer controls% in case of an invalid content input by default. Use set..Message(..)% predicates to customize these error messages.% @endpredicates
setIllegalValueMessage :(string NewErrorMessage).
% @short Sets the specified error message to be used in case of illegal value.% @detail See errorMessage_illegalValue about a format of the message.% @endpredicates
setIllegalValueMandatoryMessage :(string NewErrorMessage).
% @short Sets the specified error message to be used in case of absent value.% @detail See errorMessage_illegalValueMandatory about a format of the message.% @endpredicates
setIllegalValueMinimumMaximumMessage :(string NewErrorMessage).
% @short Sets the specified error message to be used in case of% non-belonging to the minimum-maximum range.% @detail See errorMessage_illegalValueMinimumMaximum about a format of the message.% @endpredicates
setIllegalValueMinimumMessage :(string NewErrorMessage).
% @short Sets the specified error message to be used in case of% a value less than the minimum.% @detail See errorMessage_illegalValueMinimum about a format of the message.% @endpredicates
setIllegalValueMaximumMessage :(string NewErrorMessage).
% @short Sets the specified error message to be used in case of% a value greater than the maximum.% @detail See errorMessage_illegalValueMaximum about a format of the message.% @endend class integerControl
Thomas,
Thank you for the sent home-made counterpart of the class integerControl.
I do not want to modify the factory-made integerControl in Prolog Foundation Classes.
What is the safest and recommended way of making home-made versions and retaining the delivered version?
Where should I save my version if I want to use in future programs? How shall I refer them form the *.pack and *.ph files?