Help! Eingabe bei Borland

void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &Key)
{
 if (int(Key)!=8) { // Key "8" ist Backspace, also wenn Backspace gedrückt wird läuft alles normal ab 
 if ((((TEdit*)Sender)->Text.Length()==3) && (((TEdit*)Sender)->Text[1]!='-')) Key=0; // so ... wenn nicht Backspace gedrückt wurde, dann prüfen ob die der text im Edit-feld schon 3 Stellen lang ist, vorrausgesetzt an erster stelle steht kein minus
 else if ((((TEdit*)Sender)->Text.Length()==4) && (((TEdit*)Sender)->Text[1]=='-')) Key=0; // wenn das oben nicht zutrifft steht möglicherweise ein minus an erster stelle also prüfen wird das und wenn das der fall ist prüfen wir noch, ob der text schon länger als 4 zeichen ist
 if ((((TEdit*)Sender)->Text.Length()>0) && (!isdigit(Key))) Key=0; // prüfen, ob im Edit-feld schon etwas steht, wenn ja prüfen ob eine taste gedrückt wurde die eine zahl ist
 else if (int(Key)==13) { // wenn die taste die gedrückt wurde keien zahl ist prüfen, ob es die enter-taste war, wenn ja mit irgendetwas forfahren ;D
 // mit irgendwas fortfahren
 }
 }
}
//---------------------------------------------------------------------------