Root > How to... > ...get caller information?

...get caller information?

Previous pageReturn to chapter overviewNext page   

Use Caller function of TEurekaStackList class from ECallStack unit:

 

uses
  ECallStack, // for TEurekaStackList
  EClasses,   // for TELLocationInfo
  EDebugInfo; // for GetLocationInfo
 
procedure TForm1.Button1Click(Sender: TObject);
 
  procedure Test;
  var
    Caller: Pointer;
    Info: TELLocationInfo;
  begin
    Caller := TEurekaStackList.Caller;

 

    // Once caller is obtained - you can use it
    Info := GetLocationInfo(Caller);
    Label1.Caption := Info.UnitName + '.' + Info.ClassName + '.' + Info.ProcedureName;
    // Will output: 'Unit1.TForm1.Button1Click'
  end;
 
begin
  Test;
end;

 

Note: we recommend that "Stack Frames" option should be enabled.

 

 

See also:




Send feedback... Build date: 2018-11-26
Last edited: 2018-06-14
PRIVACY STATEMENT
The documentation team uses the feedback submitted to improve the EurekaLog documentation. We do not use your e-mail address for any other purpose. We will remove your e-mail address from our system after the issue you are reporting has been resolved. While we are working to resolve this issue, we may send you an e-mail message to request more information about your feedback. After the issues have been addressed, we may send you an email message to let you know that your feedback has been addressed.


Permanent link to this article: https://www.eurekalog.com/help/eurekalog/how_to_get_caller_information.php