Was mache ich da falsch?
Delphi-Quellcode:
procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
var
int:Integer;
begin
if Key = VK_Return then
begin
int:=strtoint(Edit1.text);
Label4.Caption:= 'ganze Zahl: '+ inttostr(int);
Label2.Caption:= 'HI: '+ inttostr(hi(int));
Label3.Caption:= 'LO: '+ inttostr(lo(int));
end;
end;
Bei 2345 bekomme ich als 'HI' die Zahl 9 und bei 'LO' die Zahl 41 ?!?
Sollte da nicht HI 23 und LO 45 rauskommen?