0

現在、(Delphi ではなく) DelphiScript を使用する Altium Designer でピン リスト - ピン名を抽出しています。DelphiScript と Delphi には違いがあり、そのうちの 1 つがファイル I/O コンポーネントだと思います。Altium Docs for DelphiScript によると、テキスト ファイルと csv ファイルのみを生成できます。出力ファイル .csv を作成する場合、カンマで区切られたテキストをスローして、拡張子 '.csv' を付けて保存するだけで簡単に保存できます。私の問題は、eDocEngine VCL、LibXL、TQExport4Xlsx などのプラグイン/拡張機能をインポートおよび/またはダウンロードせずに .xls ファイルを作成する方法です。TBook、TSheet、TgtXLSEngine、またはスプレッドシートを作成する他の方法を宣言しようとしましたが、宣言されていない識別子であるというエラーが表示されます。皆さん、何か考えはありますか?

レポート ライターのコード スニペット:


Procedure BeginReportPinList(AFilename: String);
Begin
    gv_FileName := AFilename + '.csv'; 
    AssignFile(gv_FileReport, gv_FileName);
    Rewrite(gv_FileReport);
End;

Procedure WriteReportDUT(AReport : String);
Begin
    WriteLn(gv_FileReport, Format('%s', [AReport]));
End;

Procedure EndReport(Dummy : Boolean);
Begin
    CloseFile(gv_FileReport);
End;


上記のプロシージャを呼び出す文字列パーサーのコード スニペット:

if dutlistX.Count = 1 then
       Begin

            PinFilename := copy(gv_Board.FileName, 1, Pos('-05', gv_Board.FileName)-1) + '-14';
            BeginReportPinList(PinFilename);

            For I := 0 To finalreport.Count - 1 Do
                Begin
                     WriteReportDUT(finalreport[I]);
                End;

            EndReport(0);
      End;
4

1 に答える 1