Hex Wert aus Editfeld an eine integer Variable übergeben

[mmfembr]

Hallo zusammen

Hab folgendes Problem : Ich möchte gerne einen vierstelligen Hexwert, welcher der User über ein Editfeld eingibt, in eine Integer Variable schreiben damit ich mit dem Wert Rechnen kann. Hierzu kann ich noch ein wenig Quellcode zur Verfügung stellen. Hab's zuerst mit "Val(...)" versucht.

Delphi-Quellcode:

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

begin
//Schreiben der Arraydaten in ein Textfile
  Assignfile(Tfile,'C:\Dokumente und Einstellungen\mmfembr\Desktop\test.txt');
  Rewrite(Tfile);
  Val(edit1.Text,ihexzaehler,code);
  For y := 0 to 7 do
    begin
      ihexzaehler := ihexzaehler + $1;
      Writeln(Tfile, inttohex(ihexzaehler,4) + ':' + hexarray[y]);
    end;
  CloseFile(Tfile);
end;
end.

Wäre froh wenn ihr mir da vielleicht helfen könnt!