Highscore bei Spiel

[LlenaA]

Der Highscore soll nur auf meinem PC gespeichert sein.

Offene Fragen:
Wie ich den Inhalt des Editorfeldes übergebe, denn bei mir geht das irgendwie nie.

[DeddyH]

Was heißt "das geht nicht"? Angenommen, Du hast einen Record der Art

Delphi-Quellcode:

type
  THighscoreRec = record
    Name: Shortstring;
    Points: Cardinal;
  end;

dann sollte sich der doch auch befüllen lassen.

Delphi-Quellcode:

var HSRec: THighscoreRec;
begin
  HSRec.Name := EditPlayer.Text;
  HSRec.Points := Punkte;
end;

Es mus ja auch nicht unbedingt ein Record an, aber da die beiden Felder zusammengehören, bietet sich ein solcher an, wenn man nicht gleich eine Klasse schreiben will.

[LlenaA]

Ich hätte das jetzt so gemacht, aber so bekomm ich die Fehlermeldung: Not enough actual parameters:

In der Unit mit dem Editorfeld:

Delphi-Quellcode:

procedure TForm1.NameÜbertragen(Sender: TObject);
begin
  SpielerName:= edit1.Text;
end;

In der Highscore Unit:

Delphi-Quellcode:

procedure TForm2.Button2Click(Sender: TObject);
begin
 with ListView1.Items.Add do begin
   Caption := Form1.NameÜbertragen;
   Data:= Pointer(Versuche);
   SubItems.Add(IntToStr(Integer(Data)));
 end;
end;

Bei Form1.NameÜbertragen erscheint der Fehler.

[DeddyH]

Caption ist ein String und NameÜbertragen eine Prozedur(-Methode), das passt ja auch nicht zusammen. Oder sollte das eigentlich eine Funktion werden?

Delphi-Quellcode:

function TForm1.NameÜbertragen: string;
begin
  Result := edit1.Text;
end;

[LlenaA]

Super funktioniert! Danke!

[haentschman]

Moin...
Bin ich im Mittelaler stehen geblieben? Seit wann funktionieren Umlaute in Prozedurnamen. Ich verzichte lieber darauf um nicht mehr Probleme zu machen als ich schon habe...

[DeddyH]

Ich glaub, seit Delphi 2009, allerdings vermeide ich solche Bezeichner auch lieber.

[Mavarik]

Zitat von haentschman:

Moin...
Bin ich im Mittelaler stehen geblieben? Seit wann funktionieren Umlaute in Prozedurnamen. Ich verzichte lieber darauf um nicht mehr Probleme zu machen als ich schon habe...

[OT]
LOL... Willkommen im Club... Wusste ich auch nicht...

Bin mir noch nicht so ganz sicher, ob ich das gut finden soll...
[/OT]