Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.09.24;
Скачать: 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 вся ветка

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

Наверх




Память: 0.47 MB
Время: 0.031 c
15-1156963858
R0NYN
2006-08-30 22:50
2006.09.24
Что лучше?


15-1156673575
Evgheni86
2006-08-27 14:12
2006.09.24
Ассемблер в Delphi


2-1157106503
lorn
2006-09-01 14:28
2006.09.24
прибавить время к дате


15-1157263685
Новичоккк
2006-09-03 10:08
2006.09.24
Помогите разобраться с сетевыми пакетами


2-1157630697
XAN
2006-09-07 16:04
2006.09.24
programma iz delphi