天软金融分析.NET函数大全 > GUI函数 > GUI功能函数

InputDialog    

简述
输入对话框,生成类似于函数、模型运行的时候自动出现的参数输入对话框。如果取消了,返回为假,否则为真。
定义
InputDialog(Title:String;Hint:String;Define:TableArray;Var Result:Array):Boolean;
参数
名称类型说明
TitleString字符串类型。对话框的标题。
HintString字符串类型。对话框的提示信息。
DefineTableArray对话框的定义,为一个表结构类型,其中包括四个字段:
字段 含义
Name 表示输入项目的标识,用来取返回值
Comment 表示输入项目的显示信息。
Type 表示输入项目的数据类别,类别见参考下的数据类别函数。
Value 表示输入项目的默认值。
ResultArray存贮返回每个字段的值,结构为以字段名为下表字段返回值为值的一维数组。字段名为Define里定义的字段Name的值
返回Boolean 布尔类型,如果取消了,返回为假,否则为真。
  • 范例

    Define:=array();
    define[0]['Name']:='Years';
    define[0]['Comment']:='年数';
    define[0]['Type']:=rdo2 uiInteger();
    define[0]['Value']:=10;
    define[1]['Name']:='NeedFunds';
    define[1]['Comment']:='是否需要基金';
    define[1]['Type']:=rdo2 uiBoolean();
    define[1]['Value']:=’True’;
    define[2]['Name']:='Name';
    define[2]['Comment']:='输入名称';
    define[2]['Type']:=rdo2 uiString();
    define[2]['Value']:='天软';
    define[3]['Name']:='GenDate';
    define[3]['Comment']:='生成日期';
    define[3]['Type']:=rdo2 uiDate();
    define[3]['Value']:=now();
    if rdo2 InputDialog('测试输入','测试',define,Result) then
    rdo2 ShowValue('测试显示',Result,False);


    显示如下:


    当选择了确认之后,ShowValue的结果显示出来如下:
相关