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;