Ini Readstring klappt nicht :(

[hedie]

Hallo

Ich habe folgendes gemacht

Delphi-Quellcode:

procedure TForm2.ListBox1Click(Sender: TObject);
var
iindex:integer;
checkname:String;
begin
iindex := listbox1.ItemIndex;
checkname := listbox1.Items[iindex] ;
form1.IdFTP1.Get(checkname+'.ini','userlog.dat',true);

with TIniFile.Create(ExtractFilePath(ParamStr(0)) + 'userlog.dat') do
  try
  Edit1.Text := ini.ReadString('Gebot','Startgebot','0');
  finally
   Free;
  end;

end;

Immer wenn ich diese funktion aufrufe und es den wert einfügen soll kommt eine zugrifsverletzung weshalb wohl?

vielen dank

[Hawkeye219]

Hallo hedie,

der Zugriff auf die Variable ini ist wahrscheinlich nur ein Überbleibsel aus einer früheren Version deines Codes. Durch die WITH-Anweisung ist er überflüssig und verursacht wohl den Fehler.

Gruß Hawkeye

[hedie]

Suuuuuuppppperrrr vielen dank echt super :D :D

Du hast recht :D

danke hat geklappt