大家看看我写的这个自定义函数错在哪里？

Question

我写了一个自定义函数，用来读取ini文件，总是出错，不知道错在哪里。
Function Tform1.myini(a,b:string):string;
 var
 myini:Tinifile;
begin
  myini:=Tinifile.Create(ExtractFilePath(Application.ExeName)+'config.ini');
  Result:=myini.ReadString(a,b);
  myini.free;
end;
procedure TForm1.Image1Click(Sender: TObject);
begin
 edit1.text:=myini('link','image1');
 ShellExecute(handle, 'open', j ,nil,nil,SW_SHOWNORMAL);
end;

Answer 1

谢谢楼上的，为什么我的edit1得不到返回值呢？var
  j:string;
begin
j:=myini('link','image1');
edit1.text:=j;
end;

Answer 2

Result:=myini.ReadString(a,b,'默认值');

Answer 3

Result:=myini.ReadString(a,b, '默认值 ');

Answer 4

谢谢楼上的，为什么我的edit1得不到返回值呢？ var 
  j:string; 
begin 
j:=myini( 'link ', 'image1 '); 
edit1.text:=j; 
end;

Answer 5

var  
  j:string;  
begin  
j:=myini.ReadString('link','image1','默认值');  
edit1.text:=j;  
end;

Answer 6

myini:=Tinifile.Create(ExtractFilePath(Application.ExeName)+ 'config.ini '); 
//ini文件路径是不是有问题？