Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.04.15;
Скачать: [xml.tar.bz2];

Вниз

Получение параметров из Cом объекта.   Найти похожие ветки 

 
kostya   (2002-04-03 09:50) [0]

У меня проблема следующего рода: Написал Com, в Delphi он прекрасно работает, но когда использую его в VBA, то все функции работают нормально, кроме тех, в которых, возвращаемый параметр строка. В макросе вылетает ошибка "клиент отключен от объекта".


 
Dimka Maslov   (2002-04-03 09:56) [1]

В Com-объектах, если они исплоьзуются в VBA нельзя использовать строки, как параметры, возвращаемые функцией. Попробуй заменить такие методы интерфейсов следующим образом

было:
function SomeFunc(Params): PChar;

надо:
function SomeFunc(Params; out ResultStr: LPCTSTR): HResult;




 
Digitman   (2002-04-03 09:57) [2]

приведи декларацию и реализацию интерфейсного функц.метода, вызов которого из VBA вызывает сию проблему


 
kostya   (2002-04-03 10:27) [3]

To Digitman

function TSearchFile.GetFileName(Number_: Integer): WideString;
begin
Result:=FileList.Strings[Number_]
end;



 
kostya   (2002-04-03 11:05) [4]

To Dimka Maslov
а что за тип LPCTSTR мне чего то такой не установить :((


 
Dimka Maslov   (2002-04-03 11:13) [5]

или можно и out WideString


 
Dok_3D   (2002-04-03 11:38) [6]

Можно out OleVariant,
если эта вариантная переменная будет иметь стринговое значение, то VBA ее прекрасно поймет.


 
Digitman   (2002-04-03 12:12) [7]

>kostya

никаких WideString ! только - OleVariant будет работать на стыке с VBA.


 
kostya   (2002-04-03 12:46) [8]

function Tfindfile.GetNameNew(No: Integer;
out PathFile: WideString): WordBool;
begin
try
PathFile:=FileList.Strings[No];
finally
Result:=True
end;
end;

Работает нормально.



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

Форум: "Основная";
Текущий архив: 2002.04.15;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.005 c
1-46388
Xpyctuk
2002-03-26 11:58
2002.04.15
Кто-нибудь знает как работать с компонентой IdBase64Encoder


3-46288
Roman_tutov
2002-03-26 14:23
2002.04.15
Опять таблица


14-46498
Бомж
2002-03-06 20:20
2002.04.15
Надоело добираться полтора часа до работы!


6-46461
Vlad__
2002-01-31 15:38
2002.04.15
ICS компоненты ( сокеты )


3-46266
Марина
2002-03-26 08:24
2002.04.15
EmptyTable





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский