Netload 2 - A Missão!!! hehehe então voce fez um probraminha em VB.NET ou (C#, em fim...)
carregou com o net load e nada aconteceu... é.... em lisp, se fazemos isso:
(defun c:algumacoisa
;....
)
(c:algumacoisa)
O programa
algumacoisa é executado logo após ser carregada a lisp, correto?
Agora, que tal se um programa feito em VB.NET também fosse executado logo após ser carregado com o netload?? Seria legal né? Imagine colocar um "splashscreen"??
O pior, é que é muito simples de fazer, veja:
Imports Autodesk.AutoCAD.Runtime
Public Class INICIALIZACAO
Implements IExtensionApplication
Private Sub Initialize() Implements IExtensionApplication.Initialize
'faça algo interessante aqui!!!
MsgBox("Ei, carregou!!! Agora, na linha de comando digite: ALGUMACOISA")
End Sub
Private Sub Terminate() Implements IExtensionApplication.Terminate
End Sub
<CommandMethod("algumacoisa")> _
Public Sub algumacoisa()
MsgBox("Ei, deu certo!!")
End Sub
End Class
O truque todo fica por conta daquele
Implements IExtensionApplication e as subs
Initialize e
Terminate.
E olha que me debati um monte pra achar isso.... afff
Ah, claro, adicione as referências ACMGD.DLL e ACDBMGD.DLL do seu autocad!!
junte isso com o
outro post do netload e você terá algo muito interessante para "autoinstalar" seu programa!!!
No mais é isso, Download aqui!!
