Question

我是新手，想知道delphi里窗口的用处

比如我想看下面程序的运行结果
procedure Add(Var I:Integer);
begin
I:=I+10; //给变量参数赋值
end;
var Num:Integer;
begin
Num:= 10;
Add(Num)；
end;
谢谢大家
我是要在delphi里做，不知道建个窗口，建了一个unit窗口，但是不能看到结果

Answer 1

这个和C有啥关系，
这个是delphi的实参，以区别于形参。

区别于
procedure Add(I:Integer);
begin
I:=I+10; //给变量参数赋值
end;

区别在于 调用Add(Num)后 一个是Num的值改变了 一个是Num的值不

想看结果就输出嘛 比如说想看NUM的值的话 就 showmessage(inttostr(NUM));
或者输出到Tmemo 如：memo1.lines.add(inttostr(NUM));
或者干脆设置断点 按F8 单步跟踪结果

你现在的程序只有计算，没有输出指令，所以你在窗口没办法看到结果。

Answer 2

亲，你用messagebox这个方法就可以啦，
procedure Add(Var I:Integer);
begin
I:=I+10; //给变量参数赋值
showmessage(inttostr(I));//显示结果，弹出对话框显示l的值
end;
var Num:Integer;
begin
Num:= 10;
Add(Num)；
showmessage(inttostr(Num));//显示结果
end;
delphi里面窗口就是窗口（其他的button，label什么的控件都是依附于窗体的），unit是单元不叫unit窗口，它里面是窗口具体的代码（功能的实现的过程），建立一个窗口必须先建立一个应用程序（工程），其他相关的窗口都是在这个工程的基础上的，建一个窗口的步骤如下:file--new--application,会默认出现一个窗体。你先file--close all,然后再执行：file--new--application,再把你的那些代码写进去，试试吧

Answer 3

1.你在窗体添加一个Button1
2.双击Button1
3.
procedure TForm1.Button1Click(Sender: TObject);
var Num:Integer;
begin
Num:= 10;
Add(Num)；//调试可以看到变化
end;

如果你想显示结果：
你把
procedure Add(Var I:Integer);
begin
I:=I+10; //给变量参数赋值
end;
改成：
function add(i:integer):integer;
begin
Result := i+10;
end;

procedure TForm1.Button1Click(Sender: TObject);
var Num:Integer;
begin
Num:= 10;
Num:= add(num);
showmessage(inttostr(num));

end;

这是不是你想实现的！？我也是新手，慢慢来！

Answer 4

楼上说的对

Answer 5

这是 关于C 语言的，你在c ++里做就可以知道程序结果，我试试看