python-schdoc/altium_crap/Scripts/Delphiscript Scripts/Processes/Quikcopy.pas

30 lines
1.1 KiB
Plaintext

{..............................................................................}
{ Summary Quick Copy - Select objects, then Copy and Paste. }
{ Copyright (c) 2003 by Altium Limited }
{..............................................................................}
{..............................................................................}
Begin
ResetParameters;
AddStringParameter('SelectionReference','False');
RunProcess('Sch:SetupPreferences');
ResetParameters;
AddStringParameter('Action','All');
RunProcess('Sch:Deselect');
ResetParameters;
RunProcess('Sch:ToggleSelection');
RunProcess('Sch:Copy');
AddStringParameter('Action','All');
RunProcess('Sch:Deselect');
ResetParameters;
RunProcess('Sch:Paste');
AddStringParameter('Action','All');
RunProcess('Sch:Deselect');
End.
{..............................................................................}
{..............................................................................}