How to export records from Tlistview to a HTML format report?

I write a ap. and generate some records
stored in Tlistview, I wonder how to
export these records from Tlistview to
a HTML format report?

Rgds

Chiwan
chiwanAsked:
Who is Participating?
 
intheConnect With a Mentor Commented:
hi,
something like this:

procedure TForm1.Button1Click(Sender: TObject);
var
sl : tstringlist;
i : integer;
begin
sl := tstringlist.create;
sl.add('<HTML>');
sl.add('<HEAD>');
sl.add('<TITLE>');
sl.add('My Report');
sl.add('</TITLE>');
sl.add('</HEAD>');
sl.add('<BODY>');
for i := 0 to listview1.items.Count -1 do
begin
sl.add('<li>' + listview1.Items[i].Caption);
end;
sl.add('</BODY>');
sl.add('</HTML>');
sl.SaveToFile('c:\myreport.html');
sl.free;
sl := nil;
end;
0
 
simonetCommented:
How are the record stored?
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.