参数(1, 1); 和 (0, 0) 请指导..

Question

本帖最后由 L3nnon 于 2010-10-30 17:10:40 编辑

Answer 1

1、Delphi中的日期时间类型是用浮点数来表示的，以D7为例：
System单元中有定义  TDateTime = type Double;
Control单元中有定义  TDate = type TDateTime;  TTime = type TDateTime;
所以TDateTime、TDate、TTime其实都不过是Double类型的“马甲”而已2、Int(X）是一个类型强制转换，结果是把对X取整，等效于Trunc()
Frac(Y) 则是返回Y的小数部分3、Button3Click中的Date, Time参数则分别是取当前系统日期和时间的系统函数，返回值类型都是TDateTime
在SysUtils单元中可以找到它们的定义

Answer 2

我是指 1, 1 和 0, 0...
不是指内部参数 TDate 和 TTime..
但感激你的指导..

Answer 3

1. Button1 的(1, 1); 和 Button2 (0, 0); 的 参数的分别, 0 和 1 它们是什么功能??
因为是日期时间类型，1就是比1900-1-1大1天，0就是正好是1900-1-12 Button3 和它们有什么分别??
它的2个传入参数好像是变量？在哪里定义、赋值的？3. Int(DateValue) + Frac(TimeValue); 的 Int(X) + Frac(Y); 它们是什么?? 有什么功能,请举例子..
前者是取浮点数的整数部分，后者取浮点数的小数部分
浮点数的整数部分正好是用来表示天的部分，浮点数的小数部分正好是用来表示1天里的时间部分

Answer 4

明白了... function Runtest(X : Integer; Y : Integer) : string;
begin
  Result := IntToStr(X + Y);
end;procedure TForm1.Button1Click(Sender: TObject);
begin
  Edit1.Text := Runtest(1, 6); {X + Y = 1 + 6} {X + Y = 1 + 6}
end;
但如果这个参数呢?? 指 %d, %d', [X, Y];
Label1.Caption := Format('Button at %d, %d', [X, Y]);

Answer 5

但如果这个参数呢?? 指 %d, %d', [X, Y];
Label1.Caption := Format('Button at %d, %d', [X, Y]);

Answer 6

"整形参数" 是不是 Integer??