在Altium Designer 10（AD10）中使用脚本创建PCB Logo，通常需要基于 DelphiScript 编写脚本文件（.pas 格式）。以下是一个完整的示例脚本，可将简单的文字或图形Logo转换为PCB上的铜箔线段（Tracks）：

基础脚本示例：在PCB上创建文字Logo

Procedure CreateTextLogo;
Var
    PCB_Board     : IPCB_Board;
    Track         : IPCB_Track;
    TextObj       : IPCB_Text;
    FontName      : String;
    TextString    : String;
    X, Y          : TCoord;
    Layer         : TLayer;
    TextHeight    : TCoord;
    TextWidth     : TCoord;
    i             : Integer;
Begin
    // 设置文本参数
    FontName      := 'Arial';   // 字体
    TextString    := 'AD10';    // Logo文本内容
    Layer         := eTopLayer; // PCB层（eTopLayer/eBottomLayer）
    TextHeight    := MilsToCoord(100); // 文本高度（100mil ≈ 2.54mm）
    X             := MilsToCoord(1000); // X坐标（起始位置）
    Y             := MilsToCoord(1000); // Y坐标

    PCB_Board := PCBServer.GetCurrentPCBBoard;
    If PCB_Board = Nil Then Exit;

    // 创建文本对象（用于计算轮廓）
    TextObj := PCBServer.PCBObjectFactory(eTextObject, eNoDimension, eCreate_Default);
    TextObj.XLocation  := X;
    TextObj.YLocation  := Y;
    TextObj.Layer      := Layer;
    TextObj.Text       := TextString;
    TextObj.Size       := TextHeight;
    TextObj.FontName   := FontName;
    TextObj.Width      := MilsToCoord(10); // 字体线宽（10mil ≈ 0.254mm）

    // 获取文本轮廓线段
    PCBServer.PreProcess;
    For i := 0 To TextObj.GetPrimitiveCount(MkSet(eTrackObject)) - 1 Do
    Begin
        Track := TextObj.GetPrimitiveAt(i, MkSet(eTrackObject));
        If Track <> Nil Then
        Begin
            Track.Layer := Layer; // 设置层
            PCB_Board.AddPCBObject(Track); // 添加到PCB
        End;
    End;
    PCBServer.PostProcess;

    // 刷新视图
    Client.SendMessage('PCB:Zoom', 'Action=Redraw' , 255, Client.CurrentView);
End;

关键参数说明

使用方法

1. 创建脚本文件：

   • 在Altium中打开 PCB文档 → 执行菜单命令 DXP » Run Script。
   • 点击 Browse... 加载脚本文件（.pas 格式）。

2. 执行脚本：

   • 选择脚本中的 CreateTextLogo 函数 → 点击 Run。
   • Logo将自动生成在PCB的指定位置（示例位置：X=1000mil, Y=1000mil）。

3. 自定义图形：

   • 如需自定义图形（非文字），需改用 位图转矢量工具（如第三方软件）生成线段坐标，再通过脚本绘制。

注意事项

1. 字体支持：

   • 仅支持 TrueType字体（如Arial/Courier New等），不支持特殊字体。

2. 多线段处理：

   • 复杂字形会生成多条线段（自动断开），无需手动连接。

3. 高级需求：

   • 对于图形Logo，推荐使用Altium内置工具：Place » Drawing Tools » Logo 直接导入位图。

扩展：导入位图Logo（非脚本方法）

1. 在PCB编辑器中点击 Place » Drawing Tools » Logo。
2. 选择位图文件（.bmp/.png）并设置：
   • 缩放比例（Scale）
   • 放置层（Layer）
   • 转换阈值（Threshold，控制黑白对比度）
3. 单击放置位图Logo（自动转换为线段/填充区域）。

此脚本适用于AD10及以上版本，如需更复杂功能（如圆弧/填充），需扩展脚本逻辑。建议优先使用Altium内置Logo工具处理图形。