uses variants; var d: array of variant; v: variant; begin v:=d; d:=v; end.