我是学VC的,现在要在Delphi下写一个程序,要把一个Demo文本控件中的文本转换成OleVariant类型,其中OleVariant的类型为varByte + varArray,请问如何转换?谢谢!

解决方案 »

  1.   

    var
      aStr: OleVariant;
    begin
      aStr := Memo1.Lines.Text;
    ...
      

  2.   

    var  A: Variant;
    begin
      A := VarArrayCreate([0, 4], varVariant);
      A[0] := 1;
      A[1] := 1234.5678;
      A[2] := 'Hello world';
      A[3] := True;
      A[4] := VarArrayOf([1, 10, 100, 1000]);
      WriteLn(A[2]); { Hello world }
      WriteLn(A[4][2]); { 100 }
    end;
      

  3.   

    memo中的数据好象可以转化为流文件,saveas。的