有一个非常棒的为BCB应用程序开发量身定做的脚本语言组件, 可以在BCB里直接解释执行, 使用起来非常方便, 只要将组件拖到你的应用程序窗口上即可, 脚本的书写语法与BCB差不多, 功能非常强大, 有了这个脚本组件, 你就可以把配置以脚本的形式放在配置里. [b]下面就是一段可以被该组件直接解释执行的脚本的例子:[/b]
    这个例子是从实际应用这个脚本开发的一个应用里截下来的一段程序, 这个脚本响应一个按钮的点击事件: 
function OnClick(Sender/*TSysFunction*/)
{
    private tForm=pubSystem.CreateInputPassword();
    if(tForm==0)return 0;
    if(tForm.ShowModal()!=1)return 0;
    private RServer=pubRServer;
    private Result=RServer.GetSqlValue(RServer.DbName,"declare @Ret int exec @Ret=ispChangePassword '"+pubServiceApp.GetUserCode()+"','"+tForm.OldPwd.Text+"','"+tForm.NewPwd.Text+"' select @Ret");
    delete tForm;
    if(Result=="succeed"){
        if(RServer.LastError.ToIntDef(0)==0){
            ShowMess("密码修改失败:原密码不正确或用户不存在");
            return 0;
        }
    }else{
        ShowMess("密码修改失败",RServer.LastError);
        return 0;
    }
    ShowMess("密码修改成功");
    return 0;
}

下载地址: 在BCB群组13552644里的共享里可以直接下载