Вниз
Скачать: CL | DM;

Необязательный параметр в библиотеке типов.   Найти похожие ветки 

 
GanibalLector ©   (2006-08-14 18:05) [0]

Ставлю значек в "Has Default Value",естественно ставлю значение в "Default Value".
В *_TLB.pas это не отобразилось.

function Fuck(Param1: Integer; Param2: Integer): Integer; safecall;

Хотя  в IDL пишут

[
id(0x000000CC)
]
HRESULT _stdcall Fuck([in] long Param1, [in, defaultvalue(2)] long Param2, [out, retval] long * VAlue );


Вызывая,все это без параметра получаю ошибку(недопустимое число параметров) :

var Obj:Variant;
begin
 Obj:=CreateOleObject("T2k.General");
 ShowMessage(IntToStr(Obj.Fuck(3)));// !! с 2 параметрами все на ура
end;


Вопрос : как заставить библиотеку типов понять необязательный параметр в некотором методе???


 
DiamondShark ©   (2006-08-14 18:37) [1]


> [
> id(0x000000CC)
> ]
> HRESULT _stdcall Fuck([in] long Param1, [in, defaultvalue(2)]
> long Param2, [out, retval] long * VAlue );

HRESULT _stdcall Fuck([in] long Param1, [in, optional, defaultvalue(2)] long Param2, [out, retval] long * VAlue );


 
DiamondShark ©   (2006-08-14 18:39) [2]

Понятное дело, в визуальном редакторе флажок соответсвующий есть.
;)



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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.029 c
2-1157101100
TakTak
2006-09-01 12:58
2006.09.24
время работы в миллисекундах.


15-1157312649
ramzes2
2006-09-03 23:44
2006.09.24
проблемы с CreateParams


1-1154439659
Евгений Владимирович
2006-08-01 17:40
2006.09.24
Как перевести DateTime в минуты?


2-1157366364
DelphiLexx
2006-09-04 14:39
2006.09.24
Lookup лист


15-1157041214
Sam Stone
2006-08-31 20:20
2006.09.24
TNSListner




   Наверх