Yes, it is.in the draft environment there is the bevel quaota that does it automatically
sin!the quota bar cannot expand, for the rsto use the suffix of the quotas.
I did not understand how you would like to expand the quota bar. Tell me?sin!
I thought he offered these possibilities.
greetings
Coptics
My intention is to add some custom button.I did not understand how you would like to expand the quota bar. Tell me?
I believe having one or more dedicated workshops each to add a certain prefix/postfix combination to the quota. for example I touch the quota, then I press the button and the cad adds "x45°", or "n.4 to 90°", or things like that. It's something that would be convenient to me, but I don't think it's possible. It would be faster than opening two or three menus in sequence as you have to do now.I did not understand how you would like to expand the quota bar. Tell me?
you can only do with a macroI believe having one or more dedicated workshops each to add a certain prefix/postfix combination to the quota. for example I touch the quota, then I press the button and the cad adds "x45°", or "n.4 to 90°", or things like that. It's something that would be convenient to me, but I don't think it's possible. It would be faster than opening two or three menus in sequence as you have to do now.
easily writeable add, it could be a good exercise to start studying the vba.you can only do with a macro
at our age, now aware that the time we have left is not infinite, we must learn how to select the goals to focus on! :finger:could be a good exercise to start studying the vba.
' dftprefissosuffisso.vbs
' gianluca vespignani 19/06/2013
' cambia prefisso suffisso
' scritto con notepad ++ : \linguaggio\vb
const sedimension = 488188096
call main()
' il codice che segue può essere incollato su vba-excel per ulteriori sviluppi
sub main()
dim prefisso ' as string
dim suffisso ' as string
dim sovrascrivi
' prefisso e suffisso impostati dall'utente
prefisso = ""
suffisso = "x 45°"
sovrascrivi = true ' attenzione cancella e sovrascrive se i campi = ""
dim objapp 'as solidedgeframework.application
dim objdoc 'as solidedgedraft.draftdocument
dim objsel 'as solidedgeframework.selectset
dim objlist 'as ...
dim objitem 'as ...
' create/get the application with specific settings
'on error resume next
set objapp = getobject(, "solidedge.application")
objapp.visible = true
if err then
err.clear
msgbox ("prima apri solid edge!!!")
'set objapp = createobject("solidedge.application")
'set objdoc = objapp.documents.add("solidedge.draftdocument")
'call objdoc.close
'set objdoc = objapp.documents.open(filedft)
'objapp.visible = true
' todo: verificare se sono nell'ambiente draft o terminare con exit sub
else
set objdoc = objapp.activedocument
end if
on error goto 0 'rigestisce gli errori
' get the active selection
set objsel = objapp.activeselectset
if objsel.count < 1 then
msgbox ("selezionare almeno una quota.")
exit sub
else
for each objitem in objsel
' filtra gli oggetti seleziona e restituisci solo le quote
if objitem.type = sedimension then
'campi:
if sovrascrivi or prefisso <> "" then
objitem.prefixstring = prefisso
end if
if sovrascrivi or suffisso <> "" then
objitem.suffixstring = suffisso
end if
' campi di tipo string utilizzabili, tested by "com object browser"
'.superfixstring = "apice" (string)
'.subfixstring = "pedice" (string)
'.subfixstring2 = "pedice2" (string)
end if
next
end if
' release objects
set objapp = nothing
set objdoc = nothing
set objsel = nothing
' msgbox("finito.")
end subLike family, ortho and hobbies? ;at our age, now aware that the time we have left is not infinite, we must learn how to select the goals to focus on! :finger:
Something like that.... At present my free time I mainly dedicate it to the racing bike, but for someone else the hobby can be programming. It's a purely subjective fact! :smile:Like family, ortho and hobbies? ;
Ah a bitumaro!Something like that.... At present my free time I mainly dedicate it to the racing bike, but for someone else the hobby can be programming. It's a purely subjective fact! :smile:
Mtb is something I've been thinking about for a while... :biggrin:All I'm planning in the summer is for mtb:finger: