использование TMemo.Lies.Objects

← →
malyar (2007-12-16 19:19) [0]

всем привет.
народ подскажите как правильно добавить значение
в свойство Memo1.Lines.Objects[n] (сохраняю переменную интегер)
а потом получить сохраненное значение (интегер)?
но при етом не трогать значение хранящиеся в
form1.Memo1.Lines.strings[n] (не удалять и не вписывать его заново)
код приведенный ниже всегда возвращает ноль

var q:integer;
q:=123;
form1.Memo1.Lines.strings[n]:="test";
...
...
form1.Memo1.Lines.Objects[n]:=tobject(q);
q:=integer(form1.Memo1.Lines.Objects[n]);
showmessage(inttostr(q));

← →
savyhinst © (2007-12-16 19:27) [1]

Может быть TObject(q)?

← →
savyhinst © (2007-12-16 19:29) [2]

Но вот точно будет работать: создать объект с свойством integer, и когда надо помещать, создать объект и поместить.

← →
{RASkov} © (2007-12-16 19:46) [3]

> [0] malyar (16.12.07 19:19)

У Memo.Lines которые типа TMemoStrings который в свою очередь типа TStrings, ни у кого нет "нормальной" реализации метода PutObject - в котором и должно происходить помещение объекта в список... А на его(объекта) чтение - вернет всегда nil, вот он и "конвертится" у тебя в 0....
Другими словами не получится у тебя задуманное с Мемо...

спам

использование TMemo.Lies.Objects Найти похожие ветки [n]