Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.08.28;
Скачать: CL | DM;

Вниз

TStringList.AddObject   Найти похожие ветки 

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

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

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


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

var
 N: integer;

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

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


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

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


 
Eraser ©   (2005-08-08 21:30) [3]

Андрей Молчанов   (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])));



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

Текущий архив: 2005.08.28;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.038 c
8-1113815283
Faraday
2005-04-18 13:08
2005.08.28
Текстура в OpenGL


3-1121360879
Sam Stone
2005-07-14 21:07
2005.08.28
Формат даты


1-1123264667
Doplhin1
2005-08-05 21:57
2005.08.28
emoticon


3-1121350756
redlord
2005-07-14 18:19
2005.08.28
sqlconnection + sqldataset


14-1123327642
Ajax
2005-08-06 15:27
2005.08.28
Фототехника в Москве