Sim nerd é possível!!! e sem aquele recurso de usar as variaveis de sistema!! navegando na net encontrei um esquema jóia!!!Vamos lá então, veja o código VBA: Function ReadLispVariable(varname As String) As Variant Dim VL As Object If VL Is Nothing Then Set VL = CreateObject(“VL.APPLICATION.16”) End If With VL.ActiveDocument.Functions Set SYM = .Item(“read”).funcall(varname) ReadLispVariable […]
Hoje vou postar uma lisp que monitora o open/save do seu desenho, bem legal para quem precisa controlar o tempo de edição do dwg, mas não confia no timer do cad, até porque pouca gente lembra de zerar ele… aí está: (vl-load-com) (defun log_me_SAVE (rea par / TMP H) (setq tmp (open (strcat (getvar “dwgprefix”)
Bom, respondendo ao Alencar, é assim que eu fiz o esquema do “mais”/”menos” mais… <html><head></head><style type=”text/css”><!–.spoiler { height: 1px; width: 1px; overflow:auto; border-width:1px; border-color:black;}.sspoiler {color: red;cursor:pointer;}.spanover {color:green; cursor:pointer;}–></style><body><span class=”sspoiler”onclick=”spoiler(‘mais…’, ‘menos…’,this,400,’98%’)”>mais…</span><div class=”spoiler”>SEU TEXTO AQUI</div></body><script language=”javascript”><!–function spoiler(textoabre, textofecha, botao, altura, largura){ divelm = botao.parentNode.getElementsByTagName(“div”).item(0) altura = altura + “” largura= largura + “” with (divelm.style) if (width
