Problem mit Ini (Auslesen)

[citybreaker]

Hallo!

Ich will mit aus einer Ini Namen auslesen lasse.
Alerdings kommt die Fehlermeldung:

Zitat:

Incomatible types: 'String' and 'Integer'

Ich hab folgendes gemacht:

Code:

procedure TForm1.FormShow(Sender: TObject);
var ini: TIniFile;
begin
  ini:=TIniFile.Create('game.ini');
  try
    Label1.Caption := ini.ReadString('Platz 1','Name',0);
    Label2.Caption := ini.ReadString('Platz 1','Highscore',0);
  finally
    ini.free;
  end;
end;

[sakura]

Die Standard-Parameter müssen auch Strings sein :!:

Code:

procedure TForm1.FormShow(Sender: TObject);
var ini: TIniFile;
begin
  ini:=TIniFile.Create('game.ini');
  try
    Label1.Caption := ini.ReadString('Platz 1','Name', [color=#ff0000]'[kein Name]'[/color]);
    Label2.Caption := ini.ReadString('Platz 1','Highscore', [color=#ff0000]'[kein Score]'[/color]);
  finally
    ini.free;
  end;
end;

...:cat:...

[CrashMan]

Der Dritte Wert bei dem Auslesen ist der "DefaultWert" also wenn es zu einem Fehler kommt. Somit muss der ein String angegeben sein
also "0"

CrashMan

EDIT:
Mist, sakura war ein kan klein bissel schneller

[Dagon]

Der dritte Parameter von ReadString muss vom Tpy String sein!

[Mirilin]

:hi:

function ReadString(const Section, Ident, Default: String): String;

[sakura]

Sag ich doch :lol:

...:cat:...

[Mirilin]

ich auch :lol:, aber später

[citybreaker]

Jetzt hab ich folgendes gemacht!

Code:

procedure TForm1.FormShow(Sender: TObject);
var ini: TIniFile;
begin
  ini:=TIniFile.Create('game.ini');
  try
    Name1.Caption := ini.ReadString('Platz 1','Name', 'Alex');
    Punkte1.Caption := ini.ReadString('Platz 1','Highscore', '9');
  finally
    ini.free;
  end;
end;

Jetzt zeigt er mir aber immer Alex im label an und
nicht das was in der Ini Steht!

Code:

[Platz 3]
Name=Seb
Highscore=10

[Dagon]

Im Code Steht "Platz 1" und in der Ini "Platz 3". Da sollten aber beide Male "Platz 1" stehen.

[citybreaker]

So hab auf

Code:

procedure TForm1.FormShow(Sender: TObject);
var ini: TIniFile;
begin
  ini:=TIniFile.Create('game.ini');
  try
    Name1.Caption := ini.ReadString('Platz 3','Name', 'Alex');
    Punkte1.Caption := ini.ReadString('Platz 3','Highscore', '9');
  finally
    ini.free;
  end;
end;

geändert! Steht aber liest immer noch nicht aus was inder Ini
steht. Schließlich steht da ja "Seb" und "10".