Problem mit Zahlen

[SnGtKs]

hallo ich schreibe gerade an einem programm und stehe gerade irgendwie auf dem schlauch und bäuchte mal hilfe ... und zwar

ich will eine zahl um eins erhöhlen vor diese Zahl ein wort setzen und das ganze in ein Edit ausgeben anschliessend nach den ausgeben in ein edit will ich die Zahl und nur die zahl in einer ini datei speichern die ganze zahl soll so aussehen ... REF0001 die nächste wäre dann REF0002 .... usw... aber irgendwie quäle ich mich damit schon seit 2 tagen und komme nicht klar ... wäre nett wenn mir mal jemand helfen könnte ...

[Khabarakh]

Die Zahl speicherst du in einem Feld, Ausgeben und wieder Einlesen macht keinen Sinn. Die Ausgabe ist dann:

Delphi-Quellcode:

Format('%s%.4d', [Prefix, Zahl]);

[SnGtKs]

hmm ... naja ich checke das zwar noch net ganz aber ich versuche es mal

edit
habe es hinbekommen ...

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  zahl2, ergebnis: Integer;
  test, test1 : string;
  Ini : TIniFile;
begin
  Ini := TIniFile.Create('c:\test.ini');
  test := Ini.ReadString('test', 'zahl', '');
  zahl2 := StrToInt(test);
  ergebnis := 1 + zahl2;
  Edit2.Text := ('REF') + IntToStr(ergebnis);
  try
  test1 := IntToStr(ergebnis);
  Ini:=TIniFile.Create('C:\test.ini');
  Ini.WriteString('test','zahl', test1);
  finally
  Ini.Free

  end;
 end;