Altium Script меняет чистый цвет

Я использую Altium 17 для написания скриптов Delphi. Я хочу установить чистый цвет, но у меня возникла проблема. когда код запускается в info.netcolor, отображается необъявленный идентификатор.

как это исправить?

      procedure TForm1.Button17Click(Sender: TObject);
var
  WS      : IWorkspace;
  project : IProject;
  doc     : Idocument;

  Info    : Inetinfo;

begin
    WS  := GetWorkspace;
    If WS = Nil Then Exit;

    project := WS.DM_FocusedProject;
    If project = Nil Then Exit;

    project.DM_Compile;

    Doc := WS.DM_FocusedDocument;

    Info := project.DM_NetInfoByName('B-');

    Info.Netcolor := $00FFFF6E;

end;

netColor является свойством InetInfo.

Я долго искал в Google, но не нашел ответа. Подскажите пожалуйста как решить спасибо.

0 ответов

Другие вопросы по тегам