小编Jee*_*eva的帖子

在delphi中格式化字符串

我想更新像"正在更新报告(1 0f 5)"这样的文字.我认为格式化功能会帮助我做到这一点.我想要这样的东西

string := Format('Updating report ( %d of %d, [1], [2])', loop, count );
Run Code Online (Sandbox Code Playgroud)

但这是不可能的.我可以选择将循环和计数存储在一个字符串中并连接所有内容.但有没有其他方法来实现我想要的?

delphi

1
推荐指数
1
解决办法
6073
查看次数

从向量中排序和提取元素

问题: 我有一个CPerson类,其成员变量是Age和Marks.我创建了一个人物矢量,并填充了这些物体.现在我想只提取得分为100分的人.

我的方法: 我尝试根据标记对矢量进行排序,然后在矢量中循环以找到100的第一个位置,然后再循环直到标记不同.这里的问题是我需要手动完成.Tommorow如果我想按年龄搜索,那么我需要重复相同的算法.还有其他办法吗?

我可以使用partial_sort_copy或upper_bound/lower_bound函数来实现它.

我正在使用VS2008

c++ stl visual-c++

0
推荐指数
1
解决办法
83
查看次数

SysUtils.LongDayNames未声明的标识符

我是delphi的新手,我尝试了以下代码

procedure TForm1.Button1Click(Sender: TObject);
var
  myDate : TDateTime;
  day    : string;

begin
  myDate := EncodeDate(2002, 12, 31);

  day := LongDayNames[DayOfWeek(myDate)];

  ShowMessage('Christmas day 2002 is on a '+day);
end;
Run Code Online (Sandbox Code Playgroud)

我已经System.SysUtilsUses部分声明但仍然得到错误未声明的标识符.

我使用的是Delphi XE3 17.0

delphi delphi-xe3

0
推荐指数
1
解决办法
3238
查看次数

StrToDateDef无法正常工作

我想将系统日期时间转换为特定格式.我的系统格式是dd/mm/yy我想转换为mm/dd/yyyy,所以我使用的是StrToDateDef.我只需要使用StrToDateDef因为日期是字符串,如果有一个字符串而不是日期我将使用默认日期.我的代码如下

  str := '30/01/14';

  GetLocaleFormatSettings(LOCALE_SYSTEM_DEFAULT, FmtStngs);
  FmtStngs.DateSeparator := '/';
  FmtStngs.ShortDateFormat := 'mm/dd/yyyy';
  FmtStngs.TimeSeparator := ':';
  FmtStngs.LongTimeFormat := 'hh:nn';

  date := StrToDateDef(str,01/28/2013,FmtStngs);
Run Code Online (Sandbox Code Playgroud)

我期待这个日期是'01/30/2014',但它将以'30/01/14'的形式出现.我做错了什么?

delphi delphi-xe

-2
推荐指数
1
解决办法
1548
查看次数

标签 统计

delphi ×3

c++ ×1

delphi-xe ×1

delphi-xe3 ×1

stl ×1

visual-c++ ×1