Einzelnen Beitrag anzeigen

hille

Registriert seit: 19. Mär 2006
100 Beiträge
 
#5

Re: Packen von Dateien / Speichern

  Alt 27. Apr 2006, 17:41
So hatte PC- Probleme, konnte nicht früher schreiben.

Danke nochmals. Ich habe mich mal umgeschaut und das in der Hilfe gefunden:

procedure TForm1.FormCreate(Sender: TObject);
var
Ini: TIniFile;
begin
Ini := TIniFile.Create( ChangeFileExt( Application.ExeName, '.INI' ) );
try
Top := Ini.ReadInteger( 'Form', 'Top', 100 );
Left := Ini.ReadInteger( 'Form', 'Left', 100 );
Caption := Ini.ReadString( 'Form', 'Caption', 'New Form' );
if Ini.ReadBool( 'Form', 'InitMax', false ) then
WindowState = wsMaximized

else
WindowState = wsNormal;
finally
TIniFile.Free;
end;
end;

Meine Idee:

Var
ini : tinifile;


procedure TForm1.Button1Click(Sender: TObject);
begin

ini := tinifile.Create( 'test.ini' );
memo1.Text := ini.ReadString( 't' , 'tot' , 'ja' )

end;

test.ini
[t]
tot=nein
schiffe=250

Aber: Die Zeile nach begin (rot) lädt nur eine Ini-Datei, die den Project Namen trägt.
Wenn ich aber nach der 1. Klammer einen String mit 'test.ini' nehme, lädt auf einmal gar nichts.
Also keine Datei und auch somit nicht, wie bei mir ob der Spieler tot ist oder nicht.
Warum erkennt Delphi das nicht!

//Konnte Farben und Schriftart nicht ändern.
//K.A. Wieso?!

Hille
  Mit Zitat antworten Zitat