Zobrazit plnou verzi příspěvku: Odkaz na txt

Ferdinand
03.11.2005, 15:15
Jakým způsobem (anebo jestli vůbec) lze v lispu odkázat na vnější txt
seznam? Tj. mám seznam, ve kterém prvky (=co řádek to jeden prvek) jsou
postupně doplňovány, a zobrazí se v dialogu pro výběr. Zatím to mám
řešený tak, že tento seznam prvků je součástí lispu - je to dosti
krkolomné (při doplňování musím vyhledat, na kterém místě, ve kterém
lispu to mám...).


pavlacka
03.11.2005, 15:35
;--- precte textovy soubor a z radku vytvori seznam(defun fMklist_from_txt (name_of_txt_file / f radek seznam)    (setq seznam '())  (setq f (open name_of_txt_file "r"))  (setq radek (read-line f))  (while radek    (setq seznam (cons radek seznam))    (setq radek (read-line f))  )  (close f)  (reverse seznam))
roman p.

Ferdinand
07.11.2005, 15:37
Dík, ale protože nejsem lisp-hlava...
1. Který txt soubor přečte (=na který se chci odkazovat): [name_of_txt_file? radek? seznam?]
2. Který je ten vytvořený seznam: [name_of_txt_file? radek? seznam?]



pavlacka
07.11.2005, 17:35
;- nekde tady bude ta predtim poslana funkce fMklist_from_txt, ma pouze jeden parametr a tim je jmeno textoveho souboru.
(defun c:NECO()
(setq seznam_hodnot (fMklist_from_txt "c:\xxx.txt"))
;-----funkce fMklist_from_txt vraci seznam, kde jednotlive polozky jsou radky textoveho souboru
)
roman p.

PepaR
08.11.2005, 12:58
Tento problém řeší funkce rtext v Express Tools... PepaR2005-11-8 12:58:55

Ferdinand
10.11.2005, 08:45

[QUOTE=PepaR]Tento problém řeší funkce rtext v Express Tools... [/QUOTE]
Rtext pouze vloží do výkresu textový soubor jako blok.