How about you overload the constructor of the TLogger class to take then name of the log file, if it's blank then user the ParamStr(0) filename.

Or just give it a parameter with a default of EmptrStr


[pascal]constructor TLogger.Create(ALogName: string = EmptyStr);[/pascal]