How to get errors of the file using OTA?

Question

I'd like to access the errors on the active file (.pas). Now a days I can find it on the left side of the IDE, as you can see on image.

I found on OTA the interface IOTAModuleErrors, that seems to be what I want. But I didn't found it on BorlandIDEServices.QueryInterface or BorlandIDEServices.GetService. Someone knows how to access it ?

Rodrigo Farias Rezino · Accepted Answer · 2016-03-24T12:48:46.153

4

I found it! It was much simpler than I thought, it's just a matter of casting the IOTAModule on the module to IOTAModuleErrors.

If you want a practical example you can check this project I use on the unit Source/FindUnit.OTAUtils.pas, on function GetErrorListFromActiveModule.

Sample:

function GetErrorsListFromActiveModule: TOTAErrors;
var
  ModuleServices: IOTAModuleServices;
  ModuleErrors: IOTAModuleErrors;
begin
  ModuleServices := BorlandIDEServices as IOTAModuleServices;
  Assert(Assigned(ModuleServices));
  ModuleErrors := ModuleServices.CurrentModule as IOTAModuleErrors;
  Result := ModuleErrors.GetErrors(ModuleServices.CurrentModule.FileName);
end;

Thank you

edited Mar 24 '16 at 12:48

answered Mar 23 '16 at 19:22

Rodrigo Farias Rezino

2,687
3
33
60

Can you post some sample code for the benefit of future readers here? That would make a much better and more complete answer. – Ken White Mar 23 '16 at 23:32
Ok, tomorrow I post a short code, I dont have Delphi on my personal pc. – Rodrigo Farias Rezino Mar 24 '16 at 00:39

How to get errors of the file using OTA?

1 Answers1