--- HTMLReport-orig/Main.pas 2003-09-20 17:10:14.000000000 +0900
+++ HTMLReport/Main.pas 2007-03-31 14:26:59.000000000 +0900
@@ -504,7 +504,10 @@
try
aReportFile.LoadFromFile(theFilePath+'ReportHeader.txt');
theReport:=DMMain.ReplaceText(aReportFile.Text,
- '=$Modelname?>', 'Database Model '+ExtractFileName(EERModel.ModelFilename));
+ '=$Modelname?>', EERModel.GetModelName);
+
+ theReport:=DMMain.ReplaceText(theReport,
+ '=$ModelComments?>', EERModel.ModelComments);
aReportFile.LoadFromFile(theFilePath+'Report.css');