⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 ujfbl.dfm

📁 行业应急系统 包括: 应急系统(待遇核发) 发放系统 开发环境:Delphi5 (sp1)+ Oracle 8.05 MultiExport是一个可以将数据按指定字段倒出
💻 DFM
📖 第 1 页 / 共 3 页
字号:
      'set'
      '  RYID = :RYID,'
      '  JFKSYF = :JFKSYF,'
      '  JFZZYF = :JFZZYF,'
      '  JFYS = :JFYS,'
      '  JFZE = :JFZE,'
      '  JFGZZE = :JFGZZE,'
      '  GRJFBL = :GRJFBL,'
      '  DWHBBL = :DWHBBL,'
      '  YWZT = :YWZT,'
      '  JBR = :JBR,'
      '  JBRQ = :JBRQ,'
      '  SHR = :SHR,'
      '  SHRQ = :SHRQ'
      'where'
      '  RYID = :OLD_RYID and'
      '  JFKSYF = :OLD_JFKSYF')
    InsertSQL.Strings = (
      'insert into tJFXX'
      
        '  (RYID, JFKSYF, JFZZYF, JFYS, JFZE, JFGZZE, GRJFBL, DWHBBL, YWZ' +
        'T, JBR, '
      '   JBRQ, SHR, SHRQ)'
      'values'
      
        '  (:RYID, :JFKSYF, :JFZZYF, :JFYS, :JFZE, :JFGZZE, :GRJFBL, :DWH' +
        'BBL, :YWZT, '
      '   :JBR, :JBRQ, :SHR, :SHRQ)')
    DeleteSQL.Strings = (
      'delete from tJFXX'
      'where'
      '  RYID = :OLD_RYID and'
      '  JFKSYF = :OLD_JFKSYF')
  end
  object qrySUM: TwwQuery
    DatabaseName = 'MainDB'
    SQL.Strings = (
      'select '
      'sum(JFYS) as SUMJFYS,sum(JFZE) as SUMJFZE'
      'from tJFXX'
      'where ryid=:ryid')
    ValidateWithMask = True
    Left = 435
    Top = 515
    ParamData = <
      item
        DataType = ftString
        Name = 'ryid'
        ParamType = ptInput
      end>
    object qrySUMSUMJFYS: TFloatField
      FieldName = 'SUMJFYS'
      Origin = 'MAINDB.TJFXX.JFYS'
    end
    object qrySUMSUMJFZE: TFloatField
      FieldName = 'SUMJFZE'
      Origin = 'MAINDB.TJFXX.JFZE'
    end
  end
  object wwIntl1: TwwIntl
    Navigator.ConfirmDeleteMessage = '是否删除记录?'
    Navigator.Hints.FirstHint = '移到第一条记录'
    Navigator.Hints.PriorHint = '移到上一条记录'
    Navigator.Hints.NextHint = '移到下一条记录'
    Navigator.Hints.LastHint = '移到最后一条记录'
    Navigator.Hints.InsertHint = '插入新记录'
    Navigator.Hints.DeleteHint = '删除当前记录'
    Navigator.Hints.EditHint = '编辑当前记录'
    Navigator.Hints.PostHint = '提交当前记录修改'
    Navigator.Hints.CancelHint = '取消修改当前记录'
    Navigator.Hints.RefreshHint = '刷新数据集内容'
    Navigator.Hints.PriorPageHint = '向后移 %d 条记录'
    Navigator.Hints.NextPageHint = '向前移 %d 条记录'
    Navigator.Hints.SaveBookmarkHint = '保存当前记录位置'
    Navigator.Hints.RestoreBookmarkHint = '回到保存的记录位置'
    Navigator.Hints.RecordViewDialogHint = '查看当前记录'
    Navigator.Hints.LocateDialogHint = '查找指定记录'
    Navigator.Hints.FilterDialogHint = '过滤数据集'
    Navigator.Hints.SearchDialogHint = '查询数据集'
    SearchDialog.SearchCharLabel = '查询字[&S]'
    SearchDialog.SearchCharShortLabel = '查询字[&S]'
    SearchDialog.SearchByLabel = '查询字段[&B]'
    SearchDialog.StatusRecLabel = '记录号 #'
    SearchDialog.StatusOfLabel = '总记录数 '
    SearchDialog.SearchCharHint = '输入递增式查询字'
    SearchDialog.SearchByHint = '递增式的查询和排序'
    LocateDialog.FieldValueLabel = '字段值[&V]'
    LocateDialog.SearchTypeLabel = '查询类型[&S]'
    LocateDialog.CaseSensitiveLabel = '大小写敏感[&C]'
    LocateDialog.MatchExactLabel = '精确匹配[&E]'
    LocateDialog.MatchStartLabel = '开始位置局部匹配[&P]'
    LocateDialog.MatchAnyLabel = '任何位置局部匹配[&A]'
    LocateDialog.FieldsLabel = '字段[&F]'
    LocateDialog.BtnFirst = '首记录[&R]'
    LocateDialog.BtnNext = '下一条[&N]'
    LocateDialog.BtnCancel = '取消'
    LocateDialog.FieldValueHint = '输入字段查询值'
    LocateDialog.CaseSensitiveHint = '大小写敏感查询'
    LocateDialog.MatchExactHint = '精确匹配的记录匹配方式'
    LocateDialog.MatchStartHint = '字段开始匹配的记录匹配方式'
    LocateDialog.MatchAnyHint = '字段任一局部匹配的记录匹配方式'
    LocateDialog.BtnFirstHint = '查询第一条匹配记录'
    LocateDialog.BtnNextHint = '从当前记录起查询下一条匹配记录'
    LocateDialog.FieldNameHint = '选择查询字段'
    MonthCalendar.PopupYearLabel = '编辑年份'
    MonthCalendar.EnterYearPrompt = '输入有效年'
    FilterDialog.BtnViewSummary = '查看汇总[&M]'
    FilterDialog.BtnViewSummaryHint = '查看当前查询标准汇总'
    FilterDialog.BtnNewSearch = '新查询[&N]'
    FilterDialog.BtnNewSearchHint = '启动新查询'
    FilterDialog.FieldOrderLabel = '字段顺序'
    FilterDialog.FieldOrderHint = '按字母顺序排序字段或按自然逻辑顺序排列字段'
    FilterDialog.AlphabeticLabel = '字母顺序[&B]'
    FilterDialog.LogicalLabel = '逻辑顺序[&L]'
    FilterDialog.AllFieldsLabel = '所有[&A]'
    FilterDialog.SearchedFieldsLabel = '查询[&S]'
    FilterDialog.StartingRangeLabel = '开始范围[&S]'
    FilterDialog.EndingRangeLabel = '结束范围[&D]'
    FilterDialog.StartingRangeHint = '输入字段开始范围'
    FilterDialog.EndingRangeHint = '输入字段结束范围'
    FilterDialog.BtnClearMin = '清除[&C]'
    FilterDialog.BtnClearMax = '清除[&E]'
    FilterDialog.BtnClearFilterValue = '清除[&C]'
    FilterDialog.BtnClearMinHint = '清除字段的初始范围'
    FilterDialog.BtnClearMaxHint = '清除字段的结束范围'
    FilterDialog.BtnClearFilterValueHint = '清除当前字段的查询值'
    FilterDialog.ByValueLabel = '值条件[&V]'
    FilterDialog.ByRangeLabel = '范围条件[&R]'
    FilterDialog.FieldValueLabel = '字段值[&V]'
    FilterDialog.FieldValueHint = '输入字段的查询值'
    FilterDialog.SearchTypeLabel = '查询类型'
    FilterDialog.SearchTypeHint = '指定字段值如何比较'
    FilterDialog.MatchExactLabel = '精确匹配[&E]'
    FilterDialog.MatchStartLabel = '开始位置局部匹配[&P]'
    FilterDialog.MatchAnyLabel = '任何位置局部匹配[&W]'
    FilterDialog.CaseSensitiveLabel = '大小写敏感[&T]'
    FilterDialog.CaseSensitiveHint = '大小写敏感查询'
    FilterDialog.NonMatchingLabel = '不匹配记录[&O]'
    FilterDialog.NonMatchingHint = '显示不匹配值的记录'
    FilterDialog.SummaryFieldLabel = '字段'
    FilterDialog.SummarySearchLabel = '查询类型'
    FilterDialog.SummaryValueLabel = '值'
    FilterDialog.FieldsLabel = '字段[&F]'
    FilterDialog.ValueRangeTabHint = '值方式或范围方式查询字段'
    FilterDialog.AllSearchedTabHint = '显示所有字段或只显示当前查询的字段'
    FilterDialog.ViewSummaryNotText = '不是'
    RichEdit.FontNameComboHint = '字体 | 改变选择区的字体'
    RichEdit.FontSizeComboHint = '字体大小 | 改变选择区的字体大小'
    RichEdit.NewButtonHint = '新建 | 创建新文档'
    RichEdit.LoadButtonHint = '装载 | 从文件装载'
    RichEdit.SaveAsButtonHint = '另存为 | 保存到文件'
    RichEdit.PrintButtonHint = '打印 | 打印活动文档'
    RichEdit.FindButtonHint = '查找 | 查找指定文字'
    RichEdit.CutButtonHint = '剪切 | 剪切选择区并放在剪贴板中'
    RichEdit.CopyButtonHint = '复制 | 复制选择区并放到剪贴板'
    RichEdit.UndoButtonHint = '撤消 | 反操作'
    RichEdit.RedoButtonHint = '重复 | 上次撤消操作的反操作'
    RichEdit.PasteButtonHint = '粘贴 | 插入剪贴板内容'
    RichEdit.BoldButtonHint = '加粗 | 设置选择区为粗体 (切换)'
    RichEdit.ColorButtonHint = '颜色 | 设置选择区的颜色'
    RichEdit.UnderlineButtonHint = '下划线 | 自动设置单线 (切换)'
    RichEdit.ItalicButtonHint = '倾斜 | 设置选择区斜体 (切换)'
    RichEdit.LeftButtonHint = '左对齐 | 调整段落左对齐 (切换)'
    RichEdit.CenterButtonHint = '居中 | 调整段落居中(切换)'
    RichEdit.RightButtonHint = '右对齐 | 调整段落右对齐 (切换)'
    RichEdit.BulletButtonHint = '项目符号 | 当前行插入项目符号 (切换)'
    RichEdit.HighlightButtonHint = '高亮度显示文字 | 使选择区高亮度显示'
    RichEdit.SaveExitHint = '保存并退出 | 保存修改并退出编辑器'
    RichEdit.PageSetupHint = '页面设置 | 改变页面布局设置'
    RichEdit.ExitHint = '退出'
    RichEdit.ClearHint = '删除选择区'
    RichEdit.SelectAllHint = '选择全部文字'
    RichEdit.FindNextHint = '重复上次查找'
    RichEdit.ReplaceHint = '替换指定文字'
    RichEdit.InsertObjectHint = '插入嵌入对象'
    RichEdit.SpellCheckHint = '拼写检查'
    RichEdit.ToolbarHint = '显示或隐藏工具栏'
    RichEdit.FormatBarHint = '显示或隐藏格式工具栏'
    RichEdit.ViewStatusBarHint = '显示或隐藏状态栏'
    RichEdit.OptionsHint = '设置选项'
    RichEdit.FontHint = '设置当前选择区的字体'
    RichEdit.ParagraphHint = '格式化当前选择段落'
    RichEdit.TabsHint = '设置制表符'
    RichEdit.CAPLockCaption = 'CAP'
    RichEdit.NUMLockCaption = 'NUM'
    RichEdit.MenuLabels.FileCaption = '文件[&F]'
    RichEdit.MenuLabels.LoadCaption = '装载[&L]'
    RichEdit.MenuLabels.SaveAsCaption = '另存为[&A]'
    RichEdit.MenuLabels.SaveExitCaption = '保存退出[&S]'
    RichEdit.MenuLabels.PrintCaption = '打印[&P]'
    RichEdit.MenuLabels.PageSetupCaption = '页面设置[&U]'
    RichEdit.MenuLabels.ExitCaption = '退出[&X]'
    RichEdit.MenuLabels.EditCaption = '编辑[&E]'
    RichEdit.MenuLabels.UndoCaption = '撤消[&U]'
    RichEdit.MenuLabels.CutCaption = '剪切[&T]'
    RichEdit.MenuLabels.CopyCaption = '复制[&C]'
    RichEdit.MenuLabels.PasteCaption = '粘贴[&P]'
    RichEdit.MenuLabels.ClearCaption = '清除[&A]'
    RichEdit.MenuLabels.SelectallCaption = '全选[&L]'
    RichEdit.MenuLabels.FindCaption = '查找[&F]'
    RichEdit.MenuLabels.FindNextCaption = '查找下一条[&N]'
    RichEdit.MenuLabels.ReplaceCaption = '替换[&E]'
    RichEdit.MenuLabels.InsertObjectCaption = '对象[&O]...'
    RichEdit.MenuLabels.ToolCaption = '工具[&T]'
    RichEdit.MenuLabels.SpellCheckCaption = '拼写检查[&S]'
    RichEdit.MenuLabels.InsertCaption = '插入[&I]'
    RichEdit.MenuLabels.RulerCaption = '标尺[&R]'
    RichEdit.MenuLabels.ViewCaption = '视图[&V]'
    RichEdit.MenuLabels.ToolbarCaption = '工具栏[&T]'
    RichEdit.MenuLabels.FormatBarCaption = '格式工具栏[&F]'
    RichEdit.MenuLabels.ViewStatusBarCaption = '状态栏[&S]'
    RichEdit.MenuLabels.OptionsCaption = '选项[&O]'
    RichEdit.MenuLabels.FormatCaption = '格式[&O]'
    RichEdit.MenuLabels.FontCaption = '字体[&F]'
    RichEdit.MenuLabels.BulletStyleCaption = '项目符号和编号[&B]'
    RichEdit.MenuLabels.ParagraphCaption = '段落[&P]'
    RichEdit.MenuLabels.TabsCaption = '制表符[&T]'
    RichEdit.MenuLabels.HelpCaption = '帮助'
    RichEdit.PopupMenuLabels.EditCaption = '编辑[&E]'
    RichEdit.PopupMenuLabels.ViewCaption = '视图[&V]'
    RichEdit.PopupMenuLabels.CutCaption = '剪切[&T]'
    RichEdit.PopupMenuLabels.CopyCaption = '复制[&C]'
    RichEdit.PopupMenuLabels.PasteCaption = '粘贴[&P]'
    RichEdit.PopupMenuLabels.FontCaption = '字体[&F]'
    RichEdit.PopupMenuLabels.BulletStyleCaption = '项目符号[&B]'
    RichEdit.PopupMenuLabels.BoldCaption = '加粗[&O]'
    RichEdit.PopupMenuLabels.ItalicCaption = '倾斜[&I]'
    RichEdit.PopupMenuLabels.UnderlineCaption = '下划线[&U]'
    RichEdit.PopupMenuLabels.ParagraphCaption = '段落[&A]'
    RichEdit.PopupMenuLabels.TabsCaption = '制表符[&T]'
    RichEdit.PopupMenuLabels.FindCaption = '查找[&D]'
    RichEdit.PopupMenuLabels.ReplaceCaption = '替换[&R]'
    RichEdit.PopupMenuLabels.InsertObjectCaption = '插入对象[&O]...'
    RichEdit.PopupMenuLabels.SpellCheckCaption = '拼写检查[&S]'
    RichEdit.ParagraphDialog.ParagraphDlgCaption = '段落'
    RichEdit.ParagraphDialog.IndentationGroupBoxCaption = '缩排'
    RichEdit.ParagraphDialog.LeftEditHint = '左缩排'
    RichEdit.ParagraphDialog.RightEditHint = '右缩排'
    RichEdit.ParagraphDialog.FirstLineEditHint = '段落缩排首行'
    RichEdit.ParagraphDialog.AlignmentHint = '改变段落对齐'
    RichEdit.ParagraphDialog.LeftEditCaption = '左:'
    RichEdit.ParagraphDialog.RightEditCaption = '右:'
    RichEdit.ParagraphDialog.FirstLineEditCaption = '首行:'
    RichEdit.ParagraphDialog.SpacingGroupCaption = '间距'
    RichEdit.ParagraphDialog.BeforeParagraphCaption = '前[&B]'
    RichEdit.ParagraphDialog.AfterParagraphCaption = '后[&E]'
    RichEdit.ParagraphDialog.WithinParagraphCaption = '行间距[&N]'
    RichEdit.ParagraphDialog.WithinParagraphAtCaption = '&At'
    RichEdit.ParagraphDialog.AlignmentCaption = '对齐'
    RichEdit.ParagraphDialog.AlignLeft = '左对齐'
    RichEdit.ParagraphDialog.AlignRight = '右对齐'
    RichEdit.ParagraphDialog.AlignCenter = '居中'
    RichEdit.TabDialog.TabDlgCaption = '制表符'
    RichEdit.TabDialog.TabGroupBoxCaption = '制表符停止位[&T]'
    RichEdit.TabDialog.SetTabButtonCaption = '设置'
    RichEdit.TabDialog.ClearTabButtonCaption = '清除'
    RichEdit.TabDialog.ClearAllButtonCaption = '全部清除'
    RichEdit.TabDialog.TabPositionEditHint = '制表符位置编辑框'
    RichEdit.TabDialog.ListBoxHint = '制表符列表'
    RichEdit.TabDialog.SetButtonHint = '设置制表符位'
    RichEdit.TabDialog.ClearButtonHint = '清除所选制表符位'
    RichEdit.TabDialog.ClearAllButtonHint = '清除全部制表符'
    UserMessages.wwDBGridDiscardChanges = '放弃当前记录的修改?'
    UserMessages.PictureValidateError = '无效的字符. 字段 : '
    UserMessages.LocateNoMatches = '没有找到匹配记录'
    UserMessages.LocateNoMoreMatches = '没有找到更多的匹配记录'
    UserMessages.MemoChangesWarning = '内容已经修改! 是否取消?'
    UserMessages.RichEditExitWarning = '内容已经修改! 是否保存?'
    UserMessages.RichEditClearWarning = '清除全部文字内容?'
    UserMessages.RichEditSpellCheckComplete = '拼写检查完毕.'
    UserMessages.RichEditMSWordNotFound = '不能启动Microsoft Word的拼写检查器'
    UserMessages.FilterDlgNoCriteria = '你没有选择查询标准'
    UserMessages.RecordViewExitWarning = '内容已经修改! 是否保存?'
    OKCancelBitmapped = True
    BtnOKCaption = '确定[&O]'
    BtnCancelCaption = '取消'
    CheckBoxInGridStyle = cbStyleAuto
    VersionInfoPower = '2000.10'
    FilterMemoSize = 65536
    DialogFontStyle = []
    Connected = True
    Left = 636
    Top = 46
  end
end

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -