Vector.ValuesToStrings Method

Overload List

#	Signature	Description
1	function ValuesToStrings(const dstList: TStrings; const Align: TFixedTextAlign; const ReFormat: string; const ImFormat: string; const Headers: Boolean; const ColumnWidth: Integer): Integer;	Converts the content of the Values array of the calling vector to a list of strings.
2	procedure ValuesToStrings(var aList: StringArray);	Writes vector values to string array.
3	procedure ValuesToStrings(const dstList: TStrings; ListIndex: Integer; Index: Integer; Len: Integer; const Align: TFixedTextAlign; const ReFormat: string; const ImFormat: string; const Headers: Boolean; const ColumnWidth: Integer);	Convert elements from Index to Index+Len-1 of the calling vector to strings with formating ReFormat for the real part and ImFormat for the imaginary part.

Overload 1: function ValuesToStrings(const dstList: TStrings; const Align: TFixedTextAlign; const ReFormat: string; const ImFormat: string; const Headers: Boolean; const ColumnWidth: Integer): Integer;

Converts the content of the Values array of the calling vector to a list of strings.

#	Name	Type
1	dstList	TStrings
2	Align	TFixedTextAlign
3	ReFormat	string
4	ImFormat	string
5	Headers	Boolean
6	ColumnWidth	Integer

Returns: Int32

Remarks:

Converts all elements of the calling vector to strings with formating ReFormat for the real part and ImFormat for the imaginary part and stores them in aList, by using the Add method of TStringsobject. If vector is not complex only the ReFormat is used.

Note
Complex numbers are formated by default as: a+bi. You can have any formating by specifying the ReFormat and ImFormat parameters, but in order for the to work, the basic a+bi formating must be preserved - (chars '+' (' - ') and 'i' ).

Performance note:
This routine will be exceedingly slow, if TRichEdit.Lines or TMemo.Lines are passed as a parameter for dstList. Use TStringList or StringList types and then call TMemo.Lines.AddStrings(yourList) for best results.

Examples

procedure TForm1.Button1Click(Sender: TObject);
var a,b: Vector;
begin
    a.SetIt(False,[1,2,3,4]);
    a.Cos;
    b.Size(a);
    b.SetVal(1);
    a := a + b; //calls a.Add(b);;

    Richedit1.Clear;
    Memo1.Clear;
    a.ValuesToStrings(Richedit1.Lines);
    b.ValuesToStrings(Richedit1.Lines);
    a.ValuesToStrings(Memo1.Lines);
    b.ValuesToStrings(Memo1.Lines);
    Memo1.Lines.SaveToFile('C:\Test.txt');
    Memo1.Lines.LoadFromFile('C:\Test.txt');
    a.StringsToValues(Memo1.Lines);
end;

See Also: Vector.StringsToValues

Overload 2: procedure ValuesToStrings(var aList: StringArray);

Writes vector values to string array.

#	Name	Type	Description
1	aList	StringArray

Result: stored in self (calling object)

Overload 3: procedure ValuesToStrings(const dstList: TStrings; ListIndex: Integer; Index: Integer; Len: Integer; const Align: TFixedTextAlign; const ReFormat: string; const ImFormat: string; const Headers: Boolean; const ColumnWidth: Integer);

Convert elements from Index to Index+Len-1 of the calling vector to strings with formating ReFormat for the real part and ImFormat for the imaginary part.

#	Name	Type	Description
1	dstList	TStrings
2	ListIndex	Integer
3	Index	Integer	start index
4	Len	Integer	element count
5	Align	TFixedTextAlign
6	ReFormat	string
7	ImFormat	string
8	Headers	Boolean
9	ColumnWidth	Integer

Result: stored in self (calling object)

Remarks:

Store them in aList starting at ListIndex. If aList is not large enough, the method will use the add method of aList object. If vector is not complex, only the ReFormat is used.