Форум: "Основная";
Текущий архив: 2002.03.04;
Скачать: [xml.tar.bz2];

Вниз

Как быстро и без напряг реализовать такую штуку...   Найти похожие ветки 

← →
MBo   (2002-02-14 14:42) [3]

Hold:array of tstringlist;
count:=0;
readcount:=0;

>>.onclick
inc(count);
setlength(hold,count);
hold[count-1]:=tstringlist.create;
hold[count-1].assign(memo1.lines);
memo1.lines.clear;

<<.onclick
inc(readcount);
memo1.lines.assign(hold[readcount-1]);

или аналогично с TList

---

Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2002.03.04;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.43 MB
Время: 0.004 c