delphi中的冒号问题
program question1;
{$APPTYPE CONSOLE}
uses
SysUtils;
type Tpoint=Record
x,y:single;
end;
const p0:Tpoint=(x:0;y:0);
var p1,p2:Tpoint;
A:array of array of Integer;
I,j: Integer;
begin
p1.x:=100;
p1.y:=200;
p2.x:=p1.x+10;
p2.y:=p1.y+20;
writeln(p1.x:0:1,' ',p1.y:0:2);
Writeln(p1.x:2:2,' ',p1.y:2:2,' ',p1.x:2);
//Setlength(a,9);后面的是对比用的 可以不用看
SetLength(a,9);
for I:=Low(A) to High(A) do
begin
SetLength(A[I],I+1);
for J:=Low(A[I]) to High(A[I]) do
begin
A[I,J]:=(I+1)*(J+1);
Write(A[I,J]:3);
end;
Writeln;
end;
readln;
end.
问题1：
p1.x:0:1 这两个冒号是做什么用的？
问题2：
p1.x:2:2 和 p1.x:0:1 输出的结果怎么是相同的？ 估计1知道了2就知道了 不过我是新手 所以啰嗦一下 谢谢解答
问题3：
Write(A[I,J]:3);
这里的 ：3 效果是 前面多了3个空格
p1.x:2
这里的 ：2 效果是1.0E+0002 怎么就会这样呢？
delphi 新人不容易 给的不多 先谢谢了
修正下：
Write(A[I,J]:3);
这里的 ：
相关问答：
VC 控制台程序:
#include <iostream>
using namespace std;
int main()
{
const int def_buffer = 1024 * 4;
DWORD t;
BYTE b[def_buffer];
memset(b, 0, sizeof(b));
PBYTE p;
t = GetTickC ......
一般都是怎么接活的？
收入怎么样
sohu？soho？
sohu 可能是small office house unit
小办公室，把家变成单位。
去威客网啊,很多个呢,还有外包的网站
学习学习。
现在Delphi做东西不行了,处于淘汰状 ......
最近换了家公司，郁闷的是关于Delphi的问题，公司之前用的也是D版Delphi7企业版的。后来被送了律事函以后，就强制改用Delphi7个人版，剧说这个版本是免费版，或者说很便宜，如果查出来，就买个好了。这下可好。苦了� ......
hongqi162、windindance
此2人长期不在线，特别是windindance
更换有能力的人上
hongqi162还是经常上来转转的
引用
更换有能力的人上
其实也不是什么能力的原因，主要可能是时间问题吧
工作的还要上班，学� ......
