Скачать: CL | DM;

Вопрос по 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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.031 c