перевод каретки

← →
zorik © (2008-12-17 11:35) [0]

Ламерский вопрос. Как еще можно записать строку с переводом каретки, кроме как:

s = "строка 1" + #13 + "строка 2"

А то константы записаные таким образом некрасиво смотрятся

← →
Palladin © (2008-12-17 11:39) [1]

ну например
s:="строка 1"#13"строка 2";

> А то константы записаные таким образом некрасиво смотрятся

эстет?

← →
Amoeba © (2008-12-17 11:40) [2]

>
> zorik © (17.12.08 11:35)
>
> Ламерский вопрос. Как еще можно записать строку с переводом
> каретки, кроме как:
>
> s = "строка 1" + #13 + "строка 2"
>
> А то константы записаные таким образом некрасиво смотрятся

Как прикажете понимать "константы ... некрасиво смотрятся"?

Вопрос и вправду ламерский.

P.S. Можно записать и так:
s = "строка 1"#13"строка 2"

← →
zorik © (2008-12-17 11:40) [3]

> эстет?

да ))) люблю когда код красивый )))

← →
Сергей М. © (2008-12-17 11:41) [4]

Так устроит ?

const CR = #13; s1 = "строка 1"+CR+"строка 2"; s2 = "строка 1"#13"строка 2";

← →
Ega23 © (2008-12-17 11:42) [5]

const CRLF = #13#10;

s := "строка 1" + CRLF + "строка 2".

А что, вправду эстет?

← →
Palladin © (2008-12-17 11:43) [6]

> да ))) люблю когда код красивый )))

код красивый - когда понятный, остальное от лукавого

рекомендую многолинейные строки "рисовать" так
s:=
"строка 1"#13+
"строка 2";

← →
Сергей М. © (2008-12-17 11:44) [7]

> с переводом каретки

"Каретку" возвращают (Carriage Return)
А переводят (точнее - подают новую) строку (Line Feed)

← →
zorik © (2008-12-17 11:47) [8]

> s2 = "строка 1"#13"строка 2";

так устроит )

← →
Ega23 © (2008-12-17 11:50) [9]

> так устроит )

Эту блевотину (да простит меня Аллах) ты называешь красивым оформлением кода????

Ну, на вкус и цвет...

← →
zorik © (2008-12-17 12:01) [10]

Тогда задам вопрос по-другому. Как, например с ини-файла считать строку с возвратом каретки, чтоб потом не мучится с ней, заменяя спец символ в проге.

Наваял примерчик:
procedure TForm1.Button1Click(Sender: TObject); var f: TIniFile; begin f := TIniFile.Create("c:/ini.ini"); f.WriteString("1", "s", "string 1"#13"string 2"); f.Free; end; procedure TForm1.Button2Click(Sender: TObject); var f: TIniFile; s: string; begin f := TIniFile.Create("c:/ini.ini"); s := f.ReadString("1", "s", ""); f.Free; MessageDlg(s, mtInformation, [mbOk], 0); end;

В файл записывается:
[1] s=string 1 string 2

а считывается только первая строчка

Понимаю что это можно обойти, и вариантов как обойти давать не надо

← →
Ega23 © (2008-12-17 12:02) [11]

> а считывается только первая строчка

читай про формат ini-файла. Много думай.

← →
clickmaker © (2008-12-17 12:04) [12]

WriteBinaryStream

← →
zorik © (2008-12-17 12:11) [13]

> Ega23 © (17.12.08 12:02) [11]

я понимаю. но думал может есть какой-то готовый спец-символ, чтоб записать одной строкой в файле

Любой, который в твоей строке появиться не может
Хоть комбинация ($%*]

← →
qqq (2008-12-17 13:10) [15]

[0]
s:="строка 1"$0D"строка 2";

> считывается только первая строчка

попробуй в кавычках

> думал может есть какой-то готовый спец-символ, чтоб записать
> одной строкой в файле

а чего бы идею из html не позаимствовать? при записи заменять #13#10 на <br>, при чтении - обратно

> а чего бы идею из html не позаимствовать? при записи заменять
> #13#10 на <br>, при чтении - обратно

угу

Тоже как то столкнулся с проблемой записи
довольно объемной информации, в том числе многострочной
в ini-файлы.
Решения, конечно той или иной степени кривизны можно всегда найти.

Мне тогда ketmar рекомендовал Lua. 2 дня мучался, на 3-й
пришло просветление. Сделал конфиги а lua.

Так что если есть некоторый резерв времени, то можно
попробовать использовать не только ini - файлы, а нечто
иное, скажем, xml...

перевод каретки Найти похожие ветки