Форум: "Начинающим";
Текущий архив: 2009.02.01;
Скачать: [xml.tar.bz2];
Вниз
перевод каретки Найти похожие ветки
← →
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]
я понимаю. но думал может есть какой-то готовый спец-символ, чтоб записать одной строкой в файле
← →
Jeer © (2008-12-17 13:01) [14]Любой, который в твоей строке появиться не может
Хоть комбинация ($%*]
← →
qqq (2008-12-17 13:10) [15][0]
s:="строка 1"$0D"строка 2";
> считывается только первая строчка
попробуй в кавычках
← →
clickmaker © (2008-12-17 16:10) [16]> думал может есть какой-то готовый спец-символ, чтоб записать
> одной строкой в файле
а чего бы идею из html не позаимствовать? при записи заменять #13#10 на <br>, при чтении - обратно
← →
zorik © (2008-12-17 17:57) [17]
> а чего бы идею из html не позаимствовать? при записи заменять
> #13#10 на <br>, при чтении - обратно
угу
← →
Denis__ © (2008-12-17 18:06) [18]Почему именно на <br>? Jeer © в [14] разве не это(по сути) посоветовал?
← →
Kostafey © (2008-12-19 00:11) [19]Тоже как то столкнулся с проблемой записи
довольно объемной информации, в том числе многострочной
в ini-файлы.
Решения, конечно той или иной степени кривизны можно всегда найти.
Мне тогда ketmar рекомендовал Lua. 2 дня мучался, на 3-й
пришло просветление. Сделал конфиги а lua.
Так что если есть некоторый резерв времени, то можно
попробовать использовать не только ini - файлы, а нечто
иное, скажем, xml...
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2009.02.01;
Скачать: [xml.tar.bz2];
Память: 0.49 MB
Время: 0.01 c