Das große Lotto-Spiel - Bet and Win

[Jay15688]

Hey Sharky,

danke für die schnelle Antwort!

Wie meinst du das genau? Zum Beispiel hier soetwas klappt nicht:

Zitat:

procedure TForm1.Spielspeichern1Click(Sender: TObject);
begin
SaveDialog1.Title := 'Spiel speichern unter: ';
SaveDialog1.FileName := 'Savegame.sav';
SaveDialog1.Filter := '.sav';

if SaveDialog1.Execute then
begin
Listbox1.Items.SaveToFile(SaveDialog1.FileName);
end;
if SaveDialog1.Execute then
begin
Listbox2.Items.SaveToFile(SaveDialog1.FileName);
end;
if SaveDialog1.Execute then
begin
Listbox3.Items.SaveToFile(SaveDialog1.FileName);
end;
if SaveDialog1.Execute then
begin
Listbox4.Items.SaveToFile(SaveDialog1.FileName);
end;
if SaveDialog1.Execute then
begin
Listbox5.Items.SaveToFile(SaveDialog1.FileName);
end;
if SaveDialog1.Execute then
begin
Listbox6.Items.SaveToFile(SaveDialog1.FileName);
end;
end;

Kannst du mir es vllt als Beispiel für die ersten zwei Listboxen vormachen? Dann dürfte ich es selber hinkriegen...

Nocheinmal Entschuldigung für meine Doofheit, aber bin erst neu dabei =)


MfG Jay