自定义函数可以传入参数吗?

Question

如下:
procedure TForm1.Dosome(uid:string;thetime:tdatetime;type:string);老是出错?

Answer 1

最后一个参数用了系统保留字，可能与系统冲突。
写成这样：
procedure TForm1.Dosome(uid:string;thetime:tdatetime;MyType:string);

Answer 2

procedure TForm1.Dosome(uid:string;thetime:tdatetime;thetype:string);

Answer 3

type是关键字改成
procedure TForm1.Dosome(uid:string;thetime:tdatetime;aType:string);
看看行不行

Answer 4

private
    { Private declarations }
    procedure Dosome;procedure TForm1.Dosome(uid:string;thetime:tdatetime;thetype:string);
begin
    ......
end;好象就这些，执行时，定义函数那一行变红，光标停在行尾，根本执行不下去，也没报错信息！

Answer 5

哦，看到！这是什么意思？
[Error] main.pas(237): Declaration of 'Dosome' differs from previous declaration

Answer 6

private
    { Private declarations }
    procedure Dosome(uid:string;thetime:tdatetime;thetype:string);procedure TForm1.Dosome(uid:string;thetime:tdatetime;thetype:string);
begin
    ......
end;