try / except, problem....

[mmfembr]

guten morgen alle zusammen

ich habe folgendes problem:
ich habe keine ahnung wie man einen fehler abfangen kann mithilfe der funktionen try/except. kann mir da vielleicht mal jemand behilflich sein und mir das in den code einpflanzen? hier mein code und die fehlermeldung (im anhang) welche dabei entsteht:

Delphi-Quellcode:

procedure THauptformular.sbtnKonvertierenClick(Sender: TObject);
var
  hexarray            : array[0..7] of String;
  ihexzaehler         : integer;


begin
//Schreiben der Arraydaten in ein Textfile
  Assignfile(Tfile,'C:\Dokumente und Einstellungen\mmfembr\Desktop\test.txt');
  Rewrite(Tfile);
  try
    ihexzaehler := StrtoInt('X' + edit1.Text);
  except
    on EConvertError do showmessage('Bitte korrekten Hexwert angeben!');
  end;
    For y := 0 to 7 do
      begin
        ihexzaehler := ihexzaehler + $1;
        Writeln(Tfile, inttohex(ihexzaehler,4) + ':' + hexarray[y]);
      end;
    CloseFile(Tfile);

end;

end.

besten dank schon im vorraus

mmfembr