[flexValue] clean up

Author: exilon

Quick.Value.pas

@@ -1059,7 +1059,6 @@ function TryVarAsType(aValue : Variant; aVarType : Word) : Boolean;
 
 procedure TFlexValue.SetAsVariant(const Value: Variant);
 var
-  dispatch : IDispatch;
   i : Int64;
   b : Boolean;
   f : Extended;