An OnSaving event handler with var parameters would allow to customize the data when they are saved, so it would add much more flexibility to the output.
This could be a common event for all output file types, for example:
AdvListView1Saving(Sender: TObject; OFT: TOutputFileType; ...
Or there could be a separate saving event for each output file type:
AdvListView1SavingHTML(Sender: TObject; AColumn: Integer; var Text: string);
or: AdvListView1SavingHTML(Sender: TObject; var Item: TListItem);
Event handler examples:
procedure AdvListView1SavingHTML(Sender: TObject; AColumn: Integer; var Text: string);
begin
case AColumn of
1: Text := CreateClickableURL(Text);
end;
end;
or respectively:
procedure AdvListView1SavingHTML(Sender: TObject; var Item: TListItem);
begin
Item.Subitems[0] := CreateClickableURL(Item.Subitems[0]);
end;
or respectively:
procedure AdvListView1Saving(Sender: TObject; OFT: TOutputFileType; var Item: TListItem);
begin
case OFT of
oftHTML:
begin
Item.Caption := '' + Item.Caption + '';
Item.Subitems[0] := CreateClickableURL(Item.Subitems[0]);
end;
oftXML: Item.Caption := AddAttributes(Item.Caption);
end;
end;
This would be very useful!