Delphi: How to get (current code line, current unit, current function) without using Assertion?
I am trying to create a log system on my program that will log debugging messages on text files, and I want to save the exact place in the code where the log message called, but I don't want to use Assert function because it creates exceptions and this system is not for logging exceptions only, also I have to write some debugging info. example usning assert: procedure AnyProcedure(); begin try Assert(1=0); except on E: Exception do Log.AddLine('Log occurred is '+E.Message+' : Start');//Log occurred is "c:\progr~..jkdj.pas" at line [29] end; //....some code try Assert(1=0); except on E: