Ĺadny brzuch
Jak chce dodać text do archiwum, które jest w ini to zapisuje mi tylko pierwszą linijkę z Memo. Jak zrobić, aby text wielolinijkowy zamienić w jednolinkijkowy (taki jak w komponencie Edit). Nie jest ważna czytelność, bo to kod źródłowy strony.
A może jest jakiś lepszy sposób zapisywania do ini?
Przed zapisem do ini mozesz np zastepowac #13 #10 [czyli odstep-w dol] jakimis znakami ktorych sie nie uzywa normalnie, a przy odczytywaniu tamte znaki zmieniac w entery. W sumie trudne to nie jest, ale trzeba znalezc znak ktorego sie nie bedzie uzywalo [moze np ` <to po lewej stronie> byc takim znakiem, a gdy ktos nacisnie klawisz i to bedzie taki to zamiast niego niech wstawi ' <- znaki sa podobne i mysle ze nikomu by roznicy nie robilo.]. Zawsze tez do ini mozesz dodac nazwe pliku i do tego wlasnie pliku zapisywac to co w memo jest... roznie mozna :) troche zamotalem ale chyba wiadomo o co chodzi
Może tak:
var i: integer; s: string; begin s := Memo1.Text; for i := 0 to Length(s) - 1 do begin if (s[i] = #13) then delete(S, i, 1); end; end;
Zmienna S zawiera tekst bez nowych lini, a na koncach starych linii (w zmiennej S) jest graficzny ich znak, który nie ma na nic wpływu.
DOPISANE (edytuję swój post aby nie pisac 2 pod rzad i nie nabijac licznika):
Ale ja bym zrobił tak jak radził Einzeinbleth:
Zawsze tez do ini mozesz dodac nazwe pliku i do tego wlasnie pliku zapisywac to co w memo jest.
Użytkownik programista1101 edytował ten post 18 kwiecień 2005, 17:43
Kod który podałeś jest dobry, tylko ja chciałbym, aby nie było tego znaku | bo wtedy program nie chce dodawać całości do ini i traktuje znak ten jako przejście do następnej linijki.
Kod który podałeś jest dobry, tylko ja chciałbym, aby nie było tego znaku | bo wtedy program nie chce dodawać całości do ini i traktuje znak ten jako przejście do następnej linijki.
Dzięki. Właśnie o to mi chodziło. :clap:
zanotowane.pl doc.pisz.pl pdf.pisz.pl zsf.htw.pl
A może jest jakiś lepszy sposób zapisywania do ini?
Przed zapisem do ini mozesz np zastepowac #13 #10 [czyli odstep-w dol] jakimis znakami ktorych sie nie uzywa normalnie, a przy odczytywaniu tamte znaki zmieniac w entery. W sumie trudne to nie jest, ale trzeba znalezc znak ktorego sie nie bedzie uzywalo [moze np ` <to po lewej stronie> byc takim znakiem, a gdy ktos nacisnie klawisz i to bedzie taki to zamiast niego niech wstawi ' <- znaki sa podobne i mysle ze nikomu by roznicy nie robilo.]. Zawsze tez do ini mozesz dodac nazwe pliku i do tego wlasnie pliku zapisywac to co w memo jest... roznie mozna :) troche zamotalem ale chyba wiadomo o co chodzi
Może tak:
var i: integer; s: string; begin s := Memo1.Text; for i := 0 to Length(s) - 1 do begin if (s[i] = #13) then delete(S, i, 1); end; end;
Zmienna S zawiera tekst bez nowych lini, a na koncach starych linii (w zmiennej S) jest graficzny ich znak, który nie ma na nic wpływu.
DOPISANE (edytuję swój post aby nie pisac 2 pod rzad i nie nabijac licznika):
Ale ja bym zrobił tak jak radził Einzeinbleth:
Zawsze tez do ini mozesz dodac nazwe pliku i do tego wlasnie pliku zapisywac to co w memo jest.
Użytkownik programista1101 edytował ten post 18 kwiecień 2005, 17:43
Kod który podałeś jest dobry, tylko ja chciałbym, aby nie było tego znaku | bo wtedy program nie chce dodawać całości do ini i traktuje znak ten jako przejście do następnej linijki.
Kod który podałeś jest dobry, tylko ja chciałbym, aby nie było tego znaku | bo wtedy program nie chce dodawać całości do ini i traktuje znak ten jako przejście do następnej linijki.
Dzięki. Właśnie o to mi chodziło. :clap: