Introduce APPDOMAIN constant (=http://www.heidisql.com/), for usage in various methods.

This commit is contained in:
Ansgar Becker
2008-02-08 21:11:08 +00:00
parent 84dc50b9bd
commit 52c85ddabc
3 changed files with 3 additions and 2 deletions

View File

@ -842,7 +842,7 @@ begin
// footer:
buffer := '</table>' + crlf + crlf + '<p>' + crlf +
'<em>generated ' + datetostr(now) + ' ' + timetostr(now) +
' by <a href="http://www.heidisql.com/">' + Generator + '</a></em></p>' + crlf + crlf +
' by <a href="'+APPDOMAIN+'">' + Generator + '</a></em></p>' + crlf + crlf +
'</body></html>';
if FStream <> nil then FStream.Write(pchar(buffer)^, length(buffer))
else begin