Показать сообщение отдельно
  #27  
Старый 07.09.2011, 00:28
Аватар для Bargest
Bargest Bargest вне форума
Профессионал
 
Регистрация: 19.10.2010
Адрес: Москва
Сообщения: 2,390
Версия Delphi: XE3/VS12/FASM
Репутация: 14665
По умолчанию

Код:
var A,B:integer;
...
Int64((@A)^):=Int64(A) shl 32 + B;
И без асмы.
__________________
jmp $ ; Happy End!
The Cake Is A Lie.
Ответить с цитированием