| Reply  #7 Passion's post 
 
 OK, but is it possible to at least show the current config, that is can there be an event that fires when the configuration changes ? Want to place the text somewhere (on the Toolbar would be perfect).
 Did this really simple script and it works the first time it runs (runs on ofnActiveProjectChange). Traps the second time....
 
 program BC;
 uses
 Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;
 
 var
 BC: IOTAProjectOptionsConfigurations;
 Bar: TStatusBar;
 begin
 BC := CnOtaGetActiveProjectOptionsConfigurations(nil);
 if BC <> nil then
 begin
 ShowMessage(BC.GetActiveConfiguration.GetName);
 // Bar := GetStatusBarFromEditor(GetCurrentEditControl);
 // Bar.SimplePanel := True;
 // Bar.SimpleText  := BC.GetActiveConfiguration.GetName;
 end;
 end.
 |