Привести TObject к integer

← →
oradb (2005-08-26 14:32) [0]

Прошу прощения за простой вопрос - с Delphi уже лет 5 не работал. А TObject к integer привести можно ?

← →
Anatoly Podgoretsky © (2005-08-26 14:35) [1]

Можно, а зачем?

← →
oradb (2005-08-26 14:48) [2]

var id : integer;
begin
id:=integer(listBox.Items.Objects[listBox.ItemIndex]);

Вопрос как ? :)

← →
Джо © (2005-08-26 14:49) [3]

Переменная типа TObject или любого производного - это есть указатель. Приводится как обычно: Integer(SomeObj).

> Вопрос как ? :)

Вот именно так, как ты и написал.

← →
oradb (2005-08-26 14:59) [5]

Да, спасибо. Тяжко просто с C# на Delphi возвращаться - в коде программы написал так:

(Integer)SomeObj