| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

TStringList.AddObject [D7, WinXP]

Андрей Молчанов ©   (2005-08-08 21:22:00) 

Здравствуйте!

Возник вопрос - пожалуйста, подскажите, как использовать TStringList.AddObject так, что бы добавлять к каждой строки число integer?

---

Андрей Молчанов   (2005-08-08 21:30:00) [1]

Спасибо! Сам я вот до этого TObject(..) не додумался.

---

Eraser   (2005-08-08 21:30:00) [2]

Андрей Молчанов   (08.08.05 21:22)

Примерно так:
var
 sl: TStringList;
 i: integer;
begin
 sl := TStringList.Create;
 i := 10;
 sl.AddObject('String', Pointer(i));
 showmessage(inttostr(longint(sl.Objects[0])));


---

Гаврила   (2005-08-08 21:26:00) [3]

var
 N: integer;

StringList.AddObject(',kf,kf,kf', TObject(N))

Читать:
N:=Integer(StringList.Objects[i]);

---

Наверх