You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
46 lines
965 B
Plaintext
46 lines
965 B
Plaintext
15 years ago
|
#usage "<b>Rename device/symbol/package in library</b>\n"
|
||
|
|
"<p>"
|
||
|
|
"<author>Author: support@cadsoft.de</author>"
|
||
|
|
|
||
|
|
// THIS PROGRAM IS PROVIDED AS IS AND WITHOUT WARRANTY OF ANY KIND, EXPRESSED OR IMPLIED
|
||
|
|
|
||
|
|
string edit = "";
|
||
|
|
string toName = edit;
|
||
|
|
|
||
|
|
if (library) library(L) {
|
||
|
|
|
||
|
|
if (deviceset) deviceset(D) {
|
||
|
|
edit = D.name;
|
||
|
|
}
|
||
|
|
|
||
|
|
if (symbol) symbol(S) {
|
||
|
|
edit = S.name;
|
||
|
|
}
|
||
|
|
if (package) package(P) {
|
||
|
|
edit = P.name;
|
||
|
|
}
|
||
|
|
|
||
|
|
int Result = dlgDialog("RENAME") {
|
||
|
|
dlgStretch(0);
|
||
|
|
string h;
|
||
|
|
sprintf(h, "<qt>Rename<p><b>%s</b><p>to :</qt>", edit);
|
||
|
|
dlgLabel(h);
|
||
|
|
dlgStretch(0);
|
||
|
|
toName = edit;
|
||
|
|
dlgStringEdit(toName);
|
||
|
|
dlgStretch(0);
|
||
|
|
dlgHBoxLayout {
|
||
|
|
dlgStretch(1);
|
||
|
|
dlgPushButton("+OK") {
|
||
|
|
dlgAccept();
|
||
|
|
}
|
||
|
|
dlgStretch(1);
|
||
|
|
dlgPushButton("-Cancel") dlgReject();
|
||
|
|
dlgStretch(0);
|
||
|
|
};
|
||
|
|
dlgStretch(1);
|
||
|
|
};
|
||
|
|
if (Result == 0) exit (0);
|
||
|
|
exit("RENAME '" + edit + "' '" + toName +"'" );
|
||
|
|
}
|