So-net無料ブログ作成
  • ブログをはじめる
  • ログイン

シンプルBOM生成スクリプト [AD Delphi Script]

あまり意味はありませんが、DelphiスクリプトでシンプルBOMを生成するには
下記のスクリプトを実行すればいいでしょう。

Procedure GENE_S_BOM;

var
board : IPCB_Board;

begin

board := PCBServer.GetCurrentPCBBoard;
if (board = nil) then exit;

{ Set ------------------------------------}

ResetParameters;
AddStringParameter('ObjectKind','Report');
AddStringParameter('KInd','SimpleBOM');
AddStringParameter('Target','Document');
RunProcess('WorkspaceManager:GenerateReport');


{ Redraw ------------------------------------}

ResetParameters;
AddStringParameter('Action','Redraw');
RunProcess('PCB:Zoom');

end;


nice!(0)  コメント(0)