lisp2arx
Visual Programming for AutoLisp Mathématiques en programmation Lisp.. doc2cpp,doc2lsp, sld2lsp, bmp2dcl, free__GifCcapture for all-CAD'platforms..
Lista Forumurilor Pe Tematici
lisp2arx | Reguli | Inregistrare | Login

POZE LISP2ARX

Nu sunteti logat.
Nou pe simpatie:
Sofia15 pe Simpatie
Femeie
24 ani
Constanta
cauta Barbat
24 - 40 ani
lisp2arx / Listof AutoLisp.100 / Vla-autoLisp14- Try Except finally Moderat de zauchan
Autor
Mesaj Pagini: 1
admin
Administrator

Din: Bucharest
Inregistrat: acum 13 ani
Postari: 507


Code:

(defun RMJ:TESTLST (fun lst)
  (vl-catch-all-error-p (vl-catch-all-apply fun (list (car lst))))
)

Cea mai bună dovadă a reîncarnării e să te întrebi care e diferența dintre sinele tău și sinele oricărui alt om sau ființă. Nu confundați sinele cu ego-ul, căci acela e suma tuturor experiențelor, a corpului și a mediului în care individul a crescut. Sinele, percepția că ești în corpul tău e toată viața. La moarte, timpul și spațiul sunt într-un stadiu nedefinit, starea universului e indefinită, indiferent de abordarea pe care o folosești (spirituală sau materialistă.

Code:

(eval (read "(list a xv"))
-------------
(if (not (vl-catch-all-error-p (setq rtn (vl-catch-all-apply func (reverse in)))))
    rtn
  )



Code:

(if (vl-catch-all-error-p
      (setq err (vl-catch-all-apply
                  (function (lambda () (vl-cmdf "_.line" "_none" (list 0 0 0) "_none" (list 100 100 0) "")))
                ) ;_ end of vl-catch-all-apply
      ) ;_ end of setq
    ) ;_ end of vl-catch-all-error-p
  (princ (strcat "\n" (vl-catch-all-error-message err)))
) ;_ end of if



try except finally (fun lst)
 fun (list (car mai bună să întrebi care dintre sinele

82.1KB


_______________________________________


pus acum 2 ani
   
admin
Administrator

Din: Bucharest
Inregistrat: acum 13 ani
Postari: 507


Code:

(if (vl-catch-all-error-p (vl-catch-all-apply 'setvar (list "CTAB" "R-601")))
  (princ "\nError.\nLayout tab 'R-601' does not exist.")
)

(command "_.LAYOUT" "C" (getvar "CTAB") cur_layout)
(setvar "CTAB" cur_layout)

Noi nu trebuie sa cautam solutii brute de credinte; (directe); acum este momentul sa cautam prin bisericii solutii-- ortodoxe , doar solutii  personale de credinte(regretabil pentru ceilalti semeni noi nu stim verdictul final al acestor solutii--exemplu ne omoara soacra ca eu am aruncat-o in Iad, altfel poate scapa; daca daca aceste frumusetii bisericii se demoleaza (cele vechii) ; noi ortodoxi atunci noi ortodoxi profitam prin solutiile personale cat putem de mult acum in 2023; pe urma cand nu or mai fii in 2027 aceste bisericii sa fim impacati(cu ce avem deja). Cine vrea solutii de grup (>100mii> 30mii.) foarte bine; directorii de fabrici, directori de banci-BRD, BCR  sa faca ei ce vor ei?

Code:

(foreach obj (list str fob mat fso reg)
            (vl-catch-all-apply 'vlax-release-object (list obj))
        )



_______________________________________


pus acum 8 luni
   
Pagini: 1  

Mergi la