der verflixte taschenrechner und die rücktaste

[Stanlay Hanks]

Hi nochmal.

Du müsstest dann

Delphi-Quellcode:

  IF Key = #8 THEN
    begin
      Edit1.Text := Copy(Edit1.Text,1,Length(Edit1.Text)-1);
    end;

in das OnKeyPress deines Editfeldes schreiben.

"Key = #8" fragt ab, ob die gedrückte Taste die Rücktaste war und "Copy" Kopiert aus einem bestimmten String (Erster Parameter) von einer bestimmten Position weg (Zweiter Parameter) bis zu einer bestimmten Länge (Dritter Parameter) alle Zeichen und gibt sie als Ergenis der Funktion zurück.

Allerdings ist "Edit1.Undo" für soetwas doch denke ich wesentlich sinnvoller, weil einfacher und kürzer.

Man liest sich, Stanlay

Edit: Ich bin heute ja mal wieder lahm