TMtxSmallInt.ValuesToStrings Method

Overload List

#	Signature	Description
1	function ValuesToStrings(const dstList: TStrings; ListIndex: Integer; Row: Integer; Col: Integer; RowCount: Integer; ColCount: Integer; const Delimiter: string; const Align: TFixedTextAlign; const Headers: Boolean; const ColumnWidth: Integer): Integer;	Convert calling matrix elements, starting with [Row,Col] and up to [Row+RowCount-1,Col+ColCount-1] elements to strings.
2	function ValuesToStrings(const dstList: TStrings; const Delimiter: string; const Align: TFixedTextAlign): Integer;	Converts the content of the matrix Values array to a list of strings.
3	function ValuesToStrings(const dstList: TStrings; const Delimiter: string; const Align: TFixedTextAlign; const Headers: Boolean; const ColumnWidth: Integer): Integer;	Converts the content of the matrix Values array to a list of strings.

Overload 1: function ValuesToStrings(const dstList: TStrings; ListIndex: Integer; Row: Integer; Col: Integer; RowCount: Integer; ColCount: Integer; const Delimiter: string; const Align: TFixedTextAlign; const Headers: Boolean; const ColumnWidth: Integer): Integer;

Convert calling matrix elements, starting with [Row,Col] and up to [Row+RowCount-1,Col+ColCount-1] elements to strings.

#	Name	Type
1	dstList	TStrings
2	ListIndex	Integer
3	Row	Integer
4	Col	Integer
5	RowCount	Integer
6	ColCount	Integer
7	Delimiter	string
8	Align	TFixedTextAlign
9	Headers	Boolean
10	ColumnWidth	Integer

Returns: Int32

Remarks:

Use text Delimiter for columns and store the resulting strings in dstList starting at ListIndex. If dstList is not large enough, the method will use the Add method of dstList object. Existing items will be overwritten. Set Align to have columns aligned left or right when using fixed width font (like Courier New). Specifiy Headers to be "true", if row and column labels are to be printed.

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

Overload 2: function ValuesToStrings(const dstList: TStrings; const Delimiter: string; const Align: TFixedTextAlign): Integer;

Converts the content of the matrix Values array to a list of strings.

#	Name	Type
1	dstList	TStrings
2	Delimiter	string
3	Align	TFixedTextAlign

Returns: Int32

Remarks:

Overload 3: function ValuesToStrings(const dstList: TStrings; const Delimiter: string; const Align: TFixedTextAlign; const Headers: Boolean; const ColumnWidth: Integer): Integer;

Converts the content of the matrix Values array to a list of strings.

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

Returns: Int32

Remarks:

Convert all elements of the calling matrix to strings with text delimiter Delimiter and store them in dstList, by using the Add method of TStrings object. Set Align to have columns aligned left or right when using fixed width font (like Courier New). Specifiy Headers to be "true", if row and column labels are to be printed.

Examples

procedure TForm1.Button1Click(Sender: TObject);
var a,b: TMtxInt;
begin
    CreateIt(a,b);
    try
        a.SetIt(2,2,[1,2,3,4]);
        a.Cos;
        b.Size(a);
        b.SetVal(1);
        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);
    finally
        FreeIt(a,b);
    end;
end;