AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Inhalt einer Stringlist laden

Ein Thema von Beatmaster S · begonnen am 26. Mai 2004 · letzter Beitrag vom 27. Mai 2004
 
Benutzerbild von Beatmaster S
Beatmaster S

Registriert seit: 17. Apr 2003
7 Beiträge
 
#1

Inhalt einer Stringlist laden

  Alt 26. Mai 2004, 21:17
Hallo Zusammen!

Ich bin gerade dabei ein Point & Click Adventure zu schreiben, funktionier alles soweit auch ganz gut (dank dem Forum... ). Nun möchte ich ein Speicher/Lade system einbauen, das folgendermaßen funktioniert:

Während dem Spiel werden bei errecihen bestimmter Stellen Variablen gesetzt und deren werden in einer Stringlist gesichert. Zum laden sollen diese wieder aus der Stringlist extrahiert werden, und in die Variablen geschrieben werden.

Das Speichern klappt ohne Probleme(die Textdatei wird mit korrektem Inhalt erzeugt), nur beim laden bekomme ich folgende Fehlermeldung:
http://www.8ung.at/warp-speed/public/Fehler.jpg


Hier mal der Code (die verwendete Variable (a) ist ein Beispiel)
Code:
var
  Form1: TForm1;
  save: Tstringlist;
  a: integer;

implementation

procedure speichern;
begin
  save := TStringList.Create;
  try
    save.Insert(0, inttostr(a));
    save.savetofile('c:\bsp.txt');
  finally
    Freeandnil(save);
  end;
end;


procedure laden;
begin
  save.LoadFromFile('c:\bsp.txt') ;
  try
   a:=strtoint(save.Strings[0]);
  finally
    freeandnil(save);
  end;
 end;


{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
 a:= strtoint(edit1.Text);
 speichern;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
 laden;
 if a = 1 then begin
  label1.Left := label1.Left + 20;
 end;
end;

end.
Währe super wenn mir da jemand weiterhelfern könnte!

Gruß Beatmaster S
  Mit Zitat antworten Zitat
 


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 15:38 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz