Форум: "KOL";
Текущий архив: 2004.08.01;
Скачать: [xml.tar.bz2];
ВнизВопрос по KOL Memo Найти похожие ветки
← →
hermit © (2004-02-28 22:57) [0]Господа, или я деревянный или лыжи не едут, почему в ниже приведенной
процедуре я получаю s выстроенные в одну строку в Мемо, а не в виде новых строк. (во всяком случае у меня именно так выглядит Мемо)
Огромный сенкс.
procedure TForm1.Button1Click(Sender: PObj);
var i,k:integer;
s:string;
begin
Memo2.Clear;
for i:=0 to Memo1.Count-1 do
begin
k:=k+(Str2Int(Memo1.Items[i])*57);
s:=s+Int2Str(k)+" ";
Memo2.Add(s);
end;
end;
← →
Gandalf © (2004-02-28 23:13) [1]А почему собственно должно быть в виде новых строк?
Memo2.Add(s+#13#10);
← →
hermit © (2004-02-28 23:19) [2]Большое спасибо ;-)))
Страницы: 1 вся ветка
Форум: "KOL";
Текущий архив: 2004.08.01;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.06 c