Einzelnen Beitrag anzeigen

mkinzler
(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.861 Beiträge
 
Delphi 11 Alexandria
 
#4

AW: HI und LO liefern falsche Werte

  Alt 1. Jan 2015, 20:03
Doch die sollten auch mit Integer funktionieren. Sie gehen aber Standardmässig von Dezimalzahlen aus und nicht von Zahlen in Hex.
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;
Markus Kinzler
  Mit Zitat antworten Zitat