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

Вниз

IDispatch type   Найти похожие ветки 

 
Горлов Евгений   (2002-12-04 14:25) [0]

Здравствуйте, Мастера Delphi. Попробуйте решить мою проблему:
Я пишу клиента для Dll-Сервера сторонней фирмы и имею только его tlb. Импортировав tlb в Delphi IDE, положил на форму сгенерированный визуальный компонент. Т.о. получился экземпляр с одним из свойств типа IDispatch, которое мне удаётся прочитать путём

var v: variant;
s: shortstring;
begin
{экземпляр1.свойство1 имеет тип IDispatch}
v:= экземпляр1.свойство1; //v будет содержать указатель на адрес
s:= v; //переменная s будет содержать "-.-.-"

Мне необходимо задать этоиу свойству значение "1.2.0", однако при реализации

v:= "1.2.0";
экземпляр1.свойство1:= v; //здесь возникнет ошибка

программа выдаёт ошибку "invalid variant type conversion"
Как поступить в таких условиях? Заранее благодарен.


 
FreeLancer ©   (2002-12-04 14:28) [1]

Опять DecimalSeparator ? Дня не проходит.


 
FreeLancer ©   (2002-12-04 14:58) [2]

экземпляр1.свойство1 имеет тип IDispatch ?
и экземпляр1.свойство1:= "1.2.0"
Пардон, не внимательно читал... как все запущено...
Радует, что это все-таки не DecimalSeparator


 
Adrian_Copil_Minune   (2002-12-04 15:22) [3]

Интересно как и почему ты хочешь свойству типа интефейс присвоить стринговое значение.


 
Fantasist ©   (2002-12-04 23:11) [4]

Тяжело что-то сказать без библиотеки типов и кода. Только зачем вообще использовать IDispatch, если импортированна библиотека типов?



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

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

Наверх




Память: 0.47 MB
Время: 0.016 c
1-51806
Дельфятник
2002-12-04 17:45
2002.12.16
Проблема с заполнением данными экземпляра класса.


3-51650
Cranium
2002-11-28 19:53
2002.12.16
IBStoredProc ругается на парметр


1-51686
avsh
2002-12-05 20:04
2002.12.16
TImage


3-51637
Alexei Sviridov
2002-11-26 16:12
2002.12.16
Paradox. Sql zapros caseinsensetive. ????


6-51867
guest_xxx
2002-10-21 12:40
2002.12.16
Disk quotas NT 4