Einzelnen Beitrag anzeigen

Benutzerbild von p80286
p80286

Registriert seit: 28. Apr 2008
Ort: Stolberg (Rhl)
6.659 Beiträge
 
FreePascal / Lazarus
 
#16

AW: Ini Datei wird nicht erstellt...

  Alt 20. Feb 2014, 16:53
Ok, aber jetzt habe ich schon wieder ein Problem mit dem Lesen der IniFile:

Delphi-Quellcode:
procedure TForm1.leseIni(IniName:string);
var
  ini:TIniFile;
  filename: String;

begin
filename := extractfilepath(paramstr(0))+IniName + '.ini';
Label5.Caption:=filename; //zeigt den Pfad und Dateinamen einwandfrei an
ini := TIniFile.Create(filename);
// INI-Datei erstellen (falls nicht vorhanden) und initialisieren
 try
  Form1.Caption:=ini.ReadString('Sektion1', 'Name', Name);
  //globale Variablen
  Gesamtkreditsum:=ini.ReadString('Sektion2', 'Gesamtkreditsumme',Gesamtkreditsum);
  Ratenhöhe:=ini.ReadString('Sektion2', 'Ratenhoehe', Ratenhöhe);
  Ratenanzhl:=ini.ReadString('Sektion2', 'Ratenanzahl', Ratenanzhl);
  Restsum:=ini.ReadString('Sektion3', 'Restsumme', Restsum);
  Sonderrat:=ini.ReadString('Sektion3', 'Sonderrate', Sonderrat);
  //
 finally
  ini.Free;
// Variable ini wieder freigeben
end;
end;

.......

procedure TForm1.Button2Click(Sender: TObject);
begin
  leseIni('MyKreditInif');
  Gesamtkreditsumme.Caption:= 'Gesamtkreditsumme '+ gesamtkreditsum;
  Ratenhoehe.Caption:='Ratenhoehe '+ Ratenhöhe;
  Ratenanzahl.Caption:='Ratenanzahl '+Ratenanzhl;
  Restsumme.Caption:='Restsumme '+Restsum;
  Sonderrate.Caption:='Sonderrate '+Sonderrat;
end;
Die Labels zeigen nichts an, obwohl die Mykreditinif.ini korrekt erstellt im aktuellen Verzeichnis liegt. Hiiiiilfe
Also
  • die INI-Datei ist vorhanden!
  • in der Ini-Datei befinden sich die gesuchten Daten an der richtigen Stelle?
  • was für einen Inhalt hat "RatenHöhe" oder "RatenAnzhl" sobald das Lesen abgeschlossen ist?
  • was sagt der Debugger dazu?

Gruß
K-H

P.S.
Du mußt nicht so laut um Hilfe rufen.
Programme gehorchen nicht Deinen Absichten sondern Deinen Anweisungen
R.E.D retired error detector
  Mit Zitat antworten Zitat