with TStack.Create do begin Push(Pointer(a)); Push(Pointer(b)); a:=Integer(Pop); b:=Integer(Pop); Free; end;