zoukankan      html  css  js  c++  java
  • Delphi 使用 Format格式话字符串的用法

    找出以前的代码,写个随笔, 又想起以前的公司和以前的同事来, 希望以前的公司和同事事事顺意。

    //返回格式化的字符串
    function TfrmLedgerExVoucherLoad.GetFormatMonth(Month: Integer): string;
    begin
    if Month < 10 then
    Result := format('%.2d', [Month])
    else
    Result := IntToStr(Month);
    end;

    {-------------------------------------------------------------------------------
    过程名: getBackStr
    作者: 张志峰
    日期: 2010.11.25
    参数: jInc: Integer
    返回值: string
    说明: 得到生成级次码的最后几位 jInc: 生成级次码后几位的数字
    -------------------------------------------------------------------------------}

    Function getBackStr(jInc: Integer): string; //
    begin
    Result := '';
    if jInc < 10000 then
    Result := Format('%.4d', [jInc]);
    end;

  • 相关阅读:
    C#构造函数
    C#析构函数
    C#常量
    C#属性
    checklistbox的用法
    2012快捷键
    查询ORACLE存储关联表
    UltraDropDown
    Linux常用命令大全(非常全!!!)
    infra 仪表盘效果
  • 原文地址:https://www.cnblogs.com/zhangzhifeng/p/3441667.html
Copyright © 2011-2022 走看看