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.
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.