Главная страница
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.028 c
14-1123263982
SergP
2005-08-05 21:46
2005.08.28
Еще раз об БД Access


14-1123236915
Digitman
2005-08-05 14:15
2005.08.28
»» Перемещено в конференцию "Начинающим"


1-1123510283
Андрей Молчанов
2005-08-08 18:11
2005.08.28
преобразование списка каталогов в древообразный вид


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


9-1115044131
Motion
2005-05-02 18:28
2005.08.28
Решение СЛАУ методом Гаусса