Добавление строки в переменную...

← →
Жуков (2005-01-18 18:52) [0]

Господа, добрый день, нужна Ваша помошь. Вопрос таков:
есть некоторая переменная. Мне надо по ходу выполнения программы добавить в эту переменную на одну строку один символ (например "1"), на втрорую - другой символ ("2"). Но надо сделать так, чтобы эти символы добавлять не в Edit (Memo, RichEdit....), а прямо в переменную, и главное чтобы на новую строку. Извините за возможно некорректно сформулированный вопрос, как спросить по-другому не знаю. Заранее спасибо!

← →
Ega23 © (2005-01-18 18:57) [1]

есть некоторая переменная.
Что за переменная? Какой тип? Если string, то
var s:string; begin s:=""; ....... s:=s+"1"+#13+#10; ..... s:=s+"2"+#13+#10; ........ end;

← →
novice__man (2005-01-18 19:03) [2]

Доброго времени суток г-н Жуков. На Ваш вопрос есть НЕКОТОРЫЙ ОТВЕТ, а как ответить по другому не знаю! Заранее пожалуйста.

← →
palva © (2005-01-18 19:21) [3]

Ega23 © (18.01.05 18:57) [1]
Хотя не по делу, но полезный совет:
"1"+#13+#10
можно записать короче:
"1"#13#10

← →
Жуков (2005-01-18 22:03) [4]

Огромное спасибо за ответы, очень помогли!!!

← →
Magic_STI (2005-01-18 22:08) [5]

Хм.. может лучше было бы использовать tstringlist?

← →
Жуков (2005-01-18 22:29) [6]

> Хм.. может лучше было бы использовать tstringlist?
Очень интересно.! Если можно (я только начинающий) то объясните плз как использовать tstringlist, буду очень признателен.

Совет начинющему, начни с другого.

Жуков (18.01.05 22:29) [6]
var strs: tstrings;
begin
strs:=TStringList.create;
strs.add("string");
.....
strs.destroy;
end;

более экономично по памяти, но менее функционально:
var
count: integer;
strs: array of string;
begin
count:=0;
setlength(strs,count);
inc(count);
setlength(strs,count);
strs[count-1]:="string";
........
for i:=count-1 downto 0 do
strs[i]:="";
set length(strs,0);
end;

В этом напралении копай :)
novice__man (18.01.05 19:03) [2]
Фи-и

ЗЫ: Купи книжку по ООП :) и по делфе :)

Добавление строки в переменную... Найти похожие ветки