_

[LISP] CADPL - Zapisywanie notatek w rysunku [Tool_005]

Forum poświęcone flagowemu produktowi oraz aplikacjom pochodnym Autodesku. To jedyne forum mające w tytule nazwę programu, a to ze względu na jego olbrzymią popularność w Polsce. Można tutaj umieszczać również posty z ogólnie pojętej tematyki "Kreślarskie 2D".

Re: [LISP] Dodawanie komentarzy w rysunku

Postprzez kojacek » gru 19, 2011 16:08

kruuger napisał(a): oj pomysl zostanie podkradziony i wstawiony tu i tam :)

oki :)
o datach i nie tylko: http://kojacek.republika.pl/diesel.html, - @ZK : sprawdź - chińczyki nie jeżdżą na dieslu :?:

kojacek
Avatar użytkownika
kojacek
 
Posty: 5506
Dołączył(a): paź 03, 2005 20:17

Re: [LISP] Dodawanie komentarzy w rysunku

Postprzez kruuger » gru 19, 2011 16:13

kojacek napisał(a): - @ZK : sprawdź - chińczyki nie jeżdżą na dieslu :?:

kojacek

na to wyglada :lol:
k.
Avatar użytkownika
kruuger
 
Posty: 4861
Dołączył(a): paź 27, 2005 20:14
Lokalizacja: Kraków

Re: [LISP] Dodawanie komentarzy w rysunku

Postprzez ZK » gru 19, 2011 16:36

Widać ładują wszystko w biopaliwa ;)

Polecenie:
Kod: Zaznacz cały
(menucmd "M=DOWOLNE_WYRAŻENIE_JĘZYKA_DIESEL")

Efekt:
Kod: Zaznacz cały
"(princ)"

Choć jak widać na załączonym obrazku, w ZwCAD coś tam mają na temat "menucmd", tyle że nie działa.
W GstarCAD nawet HELP milczy... :roll:

pozdrawiam,
ZK
Załączniki
zw.jpg
**************************************
********* http://madebynati.com *********
**************************************
Avatar użytkownika
ZK
 
Posty: 1082
Dołączył(a): mar 11, 2009 12:08
Lokalizacja: Poznań

Re: [LISP] Dodawanie komentarzy w rysunku

Postprzez kruuger » gru 20, 2011 01:07

jakos nie moglem sie oprzec co by zaprzac to do pracy :)
oprogramowane paskudnie, ale nie dumalem nad tym za duzo.
k.
Załączniki
test.gif
test.gif (71.73 KiB) Przeglądane 702 razy
Test.lsp
(6.78 KiB) Pobrane 110 razy
Avatar użytkownika
kruuger
 
Posty: 4861
Dołączył(a): paź 27, 2005 20:14
Lokalizacja: Kraków

Re: [LISP] CADPL - Zapisywanie notatek w rysunku [Tool_005]

Postprzez kruuger » kwi 16, 2012 18:18

cos tam zaczynam dzialac wiecej w temacie. zrobie z tego tool 005.
pierwsze okno chyba znajome ;)
w1.png

okno dodaj/edytuj:
w2.png
w2.png (15.37 KiB) Przeglądane 613 razy

k.
Załączniki
DrawingNotes.dcl
(3 KiB) Pobrane 92 razy
Avatar użytkownika
kruuger
 
Posty: 4861
Dołączył(a): paź 27, 2005 20:14
Lokalizacja: Kraków

Re: [LISP] CADPL - Zapisywanie notatek w rysunku [Tool_005]

Postprzez kojacek » kwi 17, 2012 12:54

Brak LM:Lst->Str zdaje się.
kojacek
Avatar użytkownika
kojacek
 
Posty: 5506
Dołączył(a): paź 03, 2005 20:17

Re: [LISP] CADPL - Zapisywanie notatek w rysunku [Tool_005]

Postprzez kruuger » kwi 17, 2012 13:09

DrawingNotes.lsp
(15.9 KiB) Pobrane 91 razy
kojacek napisał(a):Brak LM:Lst->Str zdaje się.
kojacek

ee, bylo na koncu chyba dorzucone.
teraz i tak wszystko sie zmieni.
na razie wszystko jest w powijakach.
dziala wlasciwie tylko dodawanie do listy i wyswietlanie okienek NOT, NOTA.
trzeba by sie chyba na czyms skupic (albo biblioteka, albo program). troche sie tego namnozylo.
k.
Avatar użytkownika
kruuger
 
Posty: 4861
Dołączył(a): paź 27, 2005 20:14
Lokalizacja: Kraków

Re: [LISP] CADPL - Zapisywanie notatek w rysunku [Tool_005]

Postprzez kojacek » kwi 17, 2012 13:14

kruuger napisał(a):
DrawingNotes.lsp
kojacek napisał(a):Brak LM:Lst->Str zdaje się.
kojacek

ee, bylo na koncu chyba dorzucone.
teraz i tak wszystko sie zmieni.
na razie wszystko jest w powijakach.
dziala wlasciwie tylko dodawanie do listy i wyswietlanie okienek NOT, NOTA.
trzeba by sie chyba na czyms skupic (albo biblioteka, albo program). troche sie tego namnozylo.
k.


Tydzień mnie nie było ("do wód" wyjechawszy) a i ten tydzień (końcówka zwłaszcza) taki bardziej wyluzowany z mej strony (CracoviaM) będzie... - uporzadkujmy może bibliotekę. Czuję że notatki i tak dorzucą parę funkcyjek bibliotecznych.

kojacek
Avatar użytkownika
kojacek
 
Posty: 5506
Dołączył(a): paź 03, 2005 20:17

Re: [LISP] CADPL - Zapisywanie notatek w rysunku [Tool_005]

Postprzez kruuger » kwi 17, 2012 13:37

kojacek napisał(a):
kruuger napisał(a):
DrawingNotes.lsp
kojacek napisał(a):Brak LM:Lst->Str zdaje się.
kojacek

ee, bylo na koncu chyba dorzucone.
teraz i tak wszystko sie zmieni.
na razie wszystko jest w powijakach.
dziala wlasciwie tylko dodawanie do listy i wyswietlanie okienek NOT, NOTA.
trzeba by sie chyba na czyms skupic (albo biblioteka, albo program). troche sie tego namnozylo.
k.


Tydzień mnie nie było ("do wód" wyjechawszy) a i ten tydzień (końcówka zwłaszcza) taki bardziej wyluzowany z mej strony (CracoviaM) będzie... - uporzadkujmy może bibliotekę. Czuję że notatki i tak dorzucą parę funkcyjek bibliotecznych.

kojacek

005 i tak bedzie sie pisac i pisac. wiec mozna faktycznie troche lib podciagnac.
k.
Avatar użytkownika
kruuger
 
Posty: 4861
Dołączył(a): paź 27, 2005 20:14
Lokalizacja: Kraków

Re: [LISP] CADPL - Zapisywanie notatek w rysunku [Tool_005]

Postprzez kruuger » kwi 20, 2012 13:47

znecam sie troche nad notatkami i tak:
1. na razie wczytana jest jakas tam sobie lista. wydumalem ze bedzie ona w postaci:
Kod: Zaznacz cały
(defun cd:005_DataNotes ()
  (list
    (list (list "2011/12/12" "Cos tam" "005_login") (list "Model" nil nil))
    (list (list "2010/04/22" "Zly detal" "004_login") (list "Model" nil nil))
    (list (list "2009/01/03" "Pierwszy zle" "001_login") (list "Model" nil nil))
  )
)

dzieki temu mozemy latwo wydobyc pierwsza czesc do okienka DCL car'em (wypelnic liste), a druga CADR'em. sa to dane o widoku czyli: arkusz, punkt i trzecia to chyba wysokosc widoku VIEWSIZE.
co o tym myslicie ? oczywiscie zamiast tej listy bedzie czytanie/zapisywanie do slownika.

2.powinno dzialac: dodawanie, edycja, usuwanie (lacznie z wygaszaniem przyciskow). dodawanie punku jeszcze kuleje.
3.sortowanie na razie odbywa sie po dacie (rosnaco)
k.
Załączniki
DrawingNotes.dcl
(3.02 KiB) Pobrane 94 razy
DrawingNotes.lsp
(12.09 KiB) Pobrane 95 razy
Avatar użytkownika
kruuger
 
Posty: 4861
Dołączył(a): paź 27, 2005 20:14
Lokalizacja: Kraków

Poprzednia stronaNastępna strona

Powrót do AutoCAD

Kto przegląda forum

Użytkownicy przeglądający ten dział: Brak zidentyfikowanych użytkowników