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

Вниз

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

 
ZENsan ©   (2008-06-03 15:19) [0]


TType1 = class(TSomeObject, IInterface1)
 ...
end;

TType2 = class(TSomeObject, IInterface2)
 ...
end;

var
 Obj1: TType1;
 Obj2: TType2;
 X: TObject;

begin
 X := Какой-то объект TType1/TType2


Как проверить что X поддерживает IInterface2 (без исключений)?

Я пробовал if X.GetInterface(IID_Interface2, Idc) then.. не пашет.. (IS само собой тут не годится)
Чё-то я незнаю даже теперь как это узнать без:

try
 IInterface2(X).Someproc;
except
 all is ok..
end;


 
ZENsan ©   (2008-06-03 15:28) [1]

Проблема в последнем, что интерфейс может быть пустым... и тогда просто даже нечего вызывать.


 
Игорь Шевченко ©   (2008-06-03 15:45) [2]

Учимся оформлять вопрос



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

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

Наверх




Память: 0.44 MB
Время: 0.129 c
15-1210699066
AEN
2008-05-13 21:17
2008.06.29
Программа для древовидных данных...


2-1212325071
LightRipple
2008-06-01 16:57
2008.06.29
Максимальное значение разности двух Pointer`ов.


15-1211104921
Дмитрий С
2008-05-18 14:02
2008.06.29
Фишка


3-1200914554
Mike Kouzmine
2008-01-21 14:22
2008.06.29
"Внебрачные отношения."


3-1200909327
MZ
2008-01-21 12:55
2008.06.29
запрос





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский