Examples

Some examples:

// Add the "C:\MyData.txt" text file data to the Log data.

procedure MyCustomData(EurekaExceptionRecord: TEurekaExceptionRecord; DataFields: TStrings);

var

   TextFile: TStrings;

begin

   TextFiles := TStringList.Create;

   try

     TextFiles.LoadFromFile('C:\MyData.txt'); // Load the file content

     DataFields.Add('File=' + TextFiles.Text); // Add the file context to the Log data

   finally

     TextFiles.Free;

   end;

end;

// Add a global variable (MainSQL) to the Log data.

// Global declaration...

var 

  MainSQL: string; 

procedure MyCustomData(EurekaExceptionRecord: TEurekaExceptionRecord; DataFields: TStrings);

begin

   DataFields.Add('SQL=' + MainSQL); // Add the MainSQL variable to the Log data

end;