Delete Command - Syntaxfehler?

[VkPenguin]

Guten Tag und Frohe Weihnachten ersteinmal!
Habe mich für mein Programm nach einer Lösung umgeschaut und im Prinzip auch eine hier gefunden: http://www.delphipraxis.net/156868-l...er-laenge.html

Ist sicherlich ein Anfängerfehler, aber ich möchte ebenfalls die letzte Ziffer meines Strings löschen. Hier ein Auszug aus dem Code:

Delphi-Quellcode:

...
System.schreibeText('Bitte Namen Eingeben und mit PFEILOBEN bestätigen! (LÖSCHEN:PFEILUNTEN)');
  repeat
  if Tastatur.wurdeGedrueckt then
  Begin
    if ((GetKeyState(VK_DOWN) AND 128)=128) then
    Begin
    delete(SpielerName, length(SpielerName), 1);
    System.bewegeBis(derBildschirm.breite/2-200,680);
    System.schreibeText('                                                      ');
    System.bewegeBis(derBildschirm.breite/2-200,680);
    System.schreibeText(SpielerName);
    End
    Else
    Begin
    H:=Tastatur.zeichen;
    Spielername:=SpielerName+H;
    System.bewegeBis(derBildschirm.breite/2-200,680);
    System.schreibeText(SpielerName);
    Tastatur.weiter;
    End;
   End;
  until ((GetKeyState(VK_UP) AND 128)=128);
...

Doch wenn ich Pfeilunten drücke wird jedesmal der gesamte String gelöscht.. wie kann das sein? Danke für die Hilfe!

[DeddyH]

Was sind denn das für komische Klassen, die Du da verwendest ("System" ist zudem ein ganz schlecht gewählter Name, da es eine Unit gleichen Namens gibt)?

[jaenicke]

Ich befürchte ja, dass das irgendeine "Vereinfachung" von Leuten ist, die keine Ahnung von Informatik und schon gar nicht vom Informatikunterricht haben, und damit die Schüler malträtieren...
Und hinterher wundern sich dann die Leute warum so viele im Informatik Studium Probleme haben, wenn sie es dann richtig machen müssen... :roll:

Ja, zum Thema:
Ohne den Quelltext, den du da in diesen Hilfs-/Ärger-Klassen :mrgreen: hast, wird da kaum jemand helfen können.

// EDIT:
Denn rein die Anwendung von Delete sieht richtig aus.

[Furtbichler]

Gut, "System" ist unglücklich. Aber 'derBildschirm' ist konsequent, denn wenigstens weiss man genau, was das für ein Objekt ist. Bloß weil es nicht englisch ist, heißt es ja nicht, das es komisch ist, oder?

Zitat:

Zitat von DeddyH (Beitrag 1142912)

Was sind denn das für komische Klassen...?

Komisch ist höchstens deine Reaktion.

Zitat:

Zitat von jaenicke (Beitrag 1142918)

Ich befürchte ja, dass das irgendeine "Vereinfachung" von Leuten ist, die keine Ahnung von Informatik

Und das ist -gelinde gesagt- überheblich.

Was liefert denn 'Tastatur.wurdeGedrueckt'? Liefert sie nur einmalig TRUE und dann sofort FALSE oder liefert die Funktion immer genau dann TRUE, wenn bzw. solange die Taste gedrückt ist. Denn dann wird bei jedem Schleifendurchlauf ein Zeichen gelöscht solange eine Taste gedrückt ist.

Probiere doch mal:
Wenn Taste "Pfeil runter" gedrückt, dann lösche ein Zeichen und warte dann, bis die Taste nicht mehr gedrückt ist.

[DeddyH]

Hast Du schonmal mSum gesehen? Dann würdest Du Dich nämlich nicht über unsere Reaktionen wundern.

[VkPenguin]

Hallo, vielen Dank ersteinmal für die Antworten. Die "komischen Klassen" resultieren aus den Units, die ich im Informatikunterricht benutzen muss (Msum und Mliste). Habe schon öfters gelesen, dass erfahrene Informatiker die als schlecht einstufen, aber da kann ich als Schüler wenig dran ändern.

Zur Erklärung: "System" ist ein Stift, der einfach schreiben und zeichnen kann. Tastatur und derBildschirm sind glaub ich selbsterklärend, "SpielerName" ist ein String (Name des Aktuellen Spielers) und "H" ist ein Char, der nur als Hilfsvariable dient, um "SpielerName" mit Leben zu füllen.

@Furtbichler: Vielen Dank für den Tipp! Tastatur.wurdeGedrueckt war in der Tat das Problem, dieser Wert bleibt solange True, bis er durch "dieTastatur.weiter" aufgehoben wird.. Ich musste also einfach nurnoch "dieTastatur.weiter" hinzufügen.

Jetzt müsste ich es nurnoch hinbekommen, dass der Spielername auf eine Maximalanzahl an Zeichen begrenzt ist.. Habe danach schonmal gesucht, bisher aber nichts gefunden. Werd es aber nochmal Probieren.

Danke nocheinmal und Frohe Weihnachten zusammen!

[DeddyH]

Zitat:

Zitat von VkPenguin (Beitrag 1142924)

Die "komischen Klassen" resultieren aus den Units, die ich im Informatikunterricht benutzen muss (Msum und Mliste).

Ich hab' s doch geahnt. Wer diese Units verbrochen hat, gehört mit Katzensch***e beworfen :wall:

[Furtbichler]

Zitat:

Zitat von DeddyH (Beitrag 1142925)

Ich hab' s doch geahnt. Wer diese Units verbrochen hat, gehört mit Katzensch***e beworfen :wall:

Oh wie gut, das das erstens zum Thema passt und zweitens die Probleme des Fragestellers löst.

[DeddyH]

Ich werde meine Posts in Zukunft per PN von Dir im Voraus genehmigen lassen, OK?

[VkPenguin]

Nur falls mal jemand das Thema findet und dieselbe Frage hat:
http://www.delphi-treff.de/tutorials...ng/ueberblick/ bietet einen guten Überblick. Alles was zur begrenzung des Strings notwendig war, ist, Spielername:String[10] festzulegen.

Das wärs dann ersteinmal, danke für eure Hilfe!