wie kann ich das 1. zeichen eines edits löschen ?

[Luckie]

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject); 
var 
  x : Integer; 
begin 
  x:=StrToInt(Edit1.Text);     // z.B.  -2   bzw: 2 
  x:= x * -1;                       // 2         -2 
  edit1.Text:=IntToStr(x);     // 2         -2 
end;

Mathematik der fünften Klasse.