2 Zahlen in einer?

[LoL]

wenn man den Tipp von static_cast beachtet gehts sogar noch einfacher

Delphi-Quellcode:

var Longint0 : Longint;
begin
  Longint0 := LoWord(StrToInt(e1.Text)) or (LoWord(StrToInt(e2.Text)) shl 16);
  e3.Text := IntToStr(LoWord(Longint0));
  e4.Text := IntToStr(HiWord(Longint0));
end;