Packen von Dateien / Speichern

[hille]

Hi
also ich habe 2 Fragen.

1. Ich programmiere gerade mit Delphi ein kleines Spiel.Dabei verwende ich viele Bild Dateien und selbstgemachte Videos. So, das wird nur riesengroß.
Gibt es eine Möglichkeit oder eine Komponente um Dateien aus ZIP-Dateien zu laden?

2. Ich will auch eine Speicher Fuktion einbauen.
Das Problem:
z.B. Wieviel Lebensenergie man hat.
Sobald man auf Speichern drückt, speichert das Programm aus z.B
memo-Feld die Lebensenergie.
Aber da muss ich immer eine neue txt-Datei erzeugen.
Gibt es eine Möglichkeit, in eine txt-Datei in verschiedenen Zeilen was reinzuschreiben, und diese Infos dann auch zu laden, sprich Zeile 4 steht Lebensenergie -> Nur das wird für Lebensenergie geladen, und nicht Zeile 8 wo Rüstung steht?

Hoffe ihr könnt mir helfen und das es nicht zu umständlich geschrieben ist.

Hille

<<FIZZ-Wars I-III kommt ende 2006 ins Internet>>

[KingIR]

Hi!

Für Frage 1 dürfte sicher die zlib von Interesse für dich sein: http://www.dellapasqua.com/delphizlib/

Und zu Frage 2: schlag mal TINIFile in der Delphi-Hilfe nach, ich glaube du möchtest eine INI-Datei benutzen.

Mehr Infos zu beidem findest du auch über die Foren-Suche.

[jim_raynor]

Kannst dir auch mal meine Komponente mit umfangreichem Tutorial dazu anschauen

http://www.developia.de/developia/vi....php?cid=13244

[hille]

Danke.
Hille

[hille]

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