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!
