procedure TForm1.SpeedButton1Click(Sender: TObject); var Apoint:TPoint; begin APoint:=TSpeedButton(Sender).ClientToScreen(Point(0,TSpeedButton(Sender).ClientHeight)); PopupMenu1.Popup(Apoint.X,Apoint.Y); end;
器件的坐标其实在我们处理布局的时候,非常有用,例如A板布局导入B板. 1.在A板PCB中执行菜单命令“File-Assembly-Generates Pick and Place File”对器件的坐标进行导出.如图31所示,注意选择选择导出格式和单位. 图 31坐标格式和单位 2.B板PCB中把所有器件执行解锁操作,否则操作会不成功,这一步一定注意! 3.在B板中执行菜单命令“Tools-Component Placement-Place From File”,在文件名的框中输入“.txt”后