我在datetostr转换中缺少什么?

时间:2016-06-19 22:25:48

标签: delphi devexpress

我认为来自devexpress的新dxDateTimeWheelPicker很可爱,所以我试着看看它是如何工作的。我试着看看标签是否会显示我转动月轮的月份,但是我得到了不兼容的类型错误(DateTime和字符串)。

require 'rails_helper'

RSpec.describe ApplicationHelper, type: :helper do
  describe '#my_method' do
    it 'returns a foo bar link' do
      expect(helper).to receive(:link_to).with('foo', 'bar')
      helper.my_method
    end
  end
end

我在这里缺少什么?我该怎么做才能使这项工作?

1 个答案:

答案 0 :(得分:2)

您要声明TDateTime变量:

var
  myDate : TDateTime;

然后,您尝试为此变量分配将TDateTime转换为字符串的函数的结果:

myDate := datetimetostr(dxDateTimeWheelPicker2.DateTime);

当然,您会遇到不兼容的类型错误,因为TDateTimeString的分配不兼容。但是对于本练习,您只需要TDateTime值本身,因此这个中间字符串转换完全没必要。所有你需要的是:

myDate := dxDateTimeWheelPicker2.DateTime;
label1.Caption := formatdatetime('mm', myDate);

在这种情况下,如果您愿意,甚至可以不使用myDate变量:

label1.Caption := formatdatetime('mm', dxDateTimeWheelPicker2.DateTime);