初学者的几个问题，不明白啊，再线ing，争取今天就结贴

Question

问题1；
在我的TForm1上有两个编辑框控件Edit1和Edit2，他们的name也是这个字母，这两个编辑框里只要求接受数字，我怎么才能得到框中所写的内容呢？最好把里面的内容取出来赋值给两个Integer。是不是用Edit1.Text？？问题2：
function可以放在那里呢？有没有那种全局函数的定义概念？我的函数定义好了后，我在Exploring 的窗口里面发现我定义的函数都在procedure里面，这是没有问题的么？
我的几个函数就是做一些数学运算，比如max（），min（），在代码中我就是用这些名字定义的
function Max(a:Integer;b:Integer):Integer;
function Min(a:Integer;b:Integer):Integer;
现在我在一个按钮的单击函数里面procedure TForm1.count(Sender: TObject);
想使用上面的两个函数，应该怎么用呢？？

Answer 1

你是真的不会还是在开玩笑？StrToInt(Edit1.Text)。最好改用Addition页的SpinEdit把你的函数声明放到一个单元的interface节
把你的函数实现放到同一个单元的implementation节
然后包含进来。
最好换个名字，因为Delphi中已经有Max和Min函数了(在Math单元)。

Answer 2

who can help me ?5555 
我自己
UP!!

Answer 3

散分贴，呵呵
edit1.text是string类型，要转换一下，用strtoint;function你放在程序开头的pulic,private那就可以了，
定义好了后，在程序中直接调用
procedure TForm1.count(Sender: TObject);
var
i,j:integer;
begin
i:=1;
j:=1;
max(i,j);
end;
别用系统自带的函数名

Answer 4

呵呵，有这样的
回答1：
当然是Edit1.Text这个呀不过赋值的时候要把类型转换一下：Integer：=strtoint(edit1.text);
回答2：
就放在随便一个单元的TYPE中的VAR下面，然后在空白的地方写就得了。其它单元要使用他只要引用那个单元就可以了！你的函数不能用MAX、MIN之类的名称。因这他们是关键字呀，不能用的，要调用的话像一般的就行了，比如：MAX（1，3）

Answer 5

说明啊！！1
我们开delphi课才4次，我认真听过一次，只因为老师太BT了，一个大姑娘人家，好好的中国人，上课不说中文，偏要说英文，本来大家的英文就不怎么好，这一闹，班上60%的人的delphi作业是copy版的。所以我下定决心来这里向众位学习的！！！！

Answer 6

恩，上面的几位好象说的有点打架了，函数到底放在那里啊？？
是interface后面
还是在type的public或者private后面啊

Answer 7

to  cxreal(夜晚的猪
：）如果我能从书上找到答案的话那就早就没有烦恼了！
to 上面几位提供放函数的位置的朋友
 你们说的好象都有问题的也！能不能给一个代码来看看？
在次说明，我是菜，我正在努力使自己不是菜

Answer 8

1）改用SpinEdit
2）
直接使用就是
注意函数必须先声明再使用！
function max...
begin
...
end;procedure tform1.count(...
begin
max(..)
end;

Answer 9

interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs;type
  TForm1 = class(TForm)
  private
    { Private declarations }
//一般在这里声明
  public
    { Public declarations }
//也可以在这里
  end;var
  Form1: TForm1;implementation{$R *.dfm}end.
之后按Ctrl+shift+C后函数的实现部分的框架会自动生成，在哪里你自个去找。
以后你老师的作业你交给我做吧。