Главная страница
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
1-1155123140
Stanislav
2006-08-09 15:32
2006.09.24
Нажата ли клавиша Shift


15-1157349637
pavel_guzhanov
2006-09-04 10:00
2006.09.24
Что-то непонятное с инсталляцией пакета


5-1139839358
Святослав
2006-02-13 17:02
2006.09.24
Как запустить процедуру после установки Parent?


2-1157389396
_Mat_
2006-09-04 21:03
2006.09.24
Отображение текста в StatusBar


1-1155045210
Kiloper
2006-08-08 17:53
2006.09.24
Есть ли аналог компонентов MEMO или RichEdit в delphi?