Greeting All,
Guess I'm brain dead today.
Can anyone share how to pull data from a TListView where ViewStyle =
vsReport for all columns and for all data even that data not shown in the
treeview?
This code pulls the first column only and only the data shown in the
treeview. If I page down in the treelist there is more data.
procedure TForm1.Button1Click(Sender: TObject);
var
Line: Integer;
PrintText: TextFile;
begin
if PrintDialog1.Execute then
begin
AssignPrn(PrintText);
Rewrite(PrintText);
Printer.Canvas.Font := RzShellList1.Font;
for Line := 0 to RzShellList1.Items.Count -1 do
Writeln(PrintText, RzShellList1.Items[Line].Caption + ' ' +
RzShellList1.Items[Line].SubItems [1]);
CloseFile(PrintText);
end;
end;
I need to pull data form all columns, and for all data not currently shown
in the treelist as well...
The treelist contains the same data that one see in windows explorer when
looking at folders and files.
Thanks,
Mike
__________________________________________________
Delphi-Talk mailing list -> Delphi-Talk@elists.org
http://lists.elists.org/cgi-bin/mailman/listinfo/delphi-talk
