jsGetStringDlg

This completely configurable dialog does one thing: it gets a string from the user. You can also specify an edit mask (like in TMaskEdit) for the edit control.

type TjsGetStringDlg = class(TComponent)
private
    FLabelCaption : String;
    FEditText : String;
    FMaxLength : Integer;
    FWindowCaption : String
    FEditMask : String;
protected
    { Protected declarations }
public
    constructor Create(AOwner : TComponent); override;
    function Execute : Boolean;
published
    property LabelCaption : String read FLabelCaption write FLabelCaption;
    property EditText : String read FEditText write FEditText;
    property MaxLength: Integer read FMaxLength write FMaxLength;
    property WindowCaption : String read FWindowCaption write FWindowCaption;
    property EditMask : String read FEditMask write FEditMask;
end;