Kurs aus Datei auslesen?!

[p0w3r5tr34m3r]

function KursAuslesen_USD : double; ist gar nicht nötig!

wenn er schon alles in einer .ini gespeichert hat dann brauch er doch lediglich folgendes zu machen

Delphi-Quellcode:

uses inifiles;

var
  ini : TIniFile;

begin
 ini := TIniFile.Create('Hier\Der\Pfad\Wo\Sich\Die\Datei\Befindet');
  try
   Label1.Caption := ini.readstring('Euro2','USD','0,00')
  except
   ShowMessage('Konnte nicht umrechnen');    
  end;
 ini.Free;
end;