VPF::Возврат параметров при вызове метода

TROFI

Дата 21.9.2007, 13:21 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 32
Регистрация: 26.10.2006
Где: ТВЕРЬ

Репутация: нет
Всего: нет

Казалось все просто. Есть COM Server, один из методов которого должен возвращать параметры

Код


STDMETHODIMP TCoSimAlarmServerImpl::GetLastMessage(DATE* pDateTimeAlarm,
  BSTR* pSourceAlarm, BSTR* pEventAlarm, BSTR* pTypeAlarm)
{
  try
  {
   *pDateTimeAlarm = MainForm->DateTimeAlarm;
   *pSourceAlarm = WideString((MainForm->SourceAlarm).c_str()).c_bstr();
   *pEventAlarm = WideString((MainForm->EventAlarm).c_str()).c_bstr();
   *pTypeAlarm = WideString((MainForm->TypeAlarm).c_str()).c_bstr();
  }
  catch (Exception &e)
  {
    return Error(e.Message.c_str(), IID_ICoSimAlarmServer);
  }
  return S_OK;
}

Есть клиент, который вызывает мотод и получает параметры

Код


void __fastcall TMainForm::Button2Click(TObject *Sender)
{
 TDateTime p1;
 WideString p2,p3,p4;
 Serv.OleFunction("GetLastMessage", &p1, &p2, &p3, &p4);
 Label_p1->Caption = p1;
 Label_p2->Caption = p2;
 Label_p3->Caption = p3;
 Label_p4->Caption = p4;
}

Так вот, параметр p1 возвращается корректно, остальные параметры имеют все одинаковое значение (причем равны все значению последнего параметра). Хотя на стороне сервера имеют разные значения в момент вызова метода (проверял)
С технологией COM до этого не имел дело.

Народ помогите, уже все перепробывал... smile

Это сообщение отредактировал(а) TROFI - 21.9.2007, 13:24

TROFI

Дата 23.9.2007, 20:07 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 32
Регистрация: 26.10.2006
Где: ТВЕРЬ

Репутация: нет
Всего: нет

Народ, ну может быть хоть в COM-СЕРВЕР методе тип BSTR передовал, приведите пример, как правильно принимать это в СОМ-КЛИЕНТЕ по указателю правильно, а то совсем руки опустились.....

zkv

Дата 23.9.2007, 20:32 (ссылка)

(нет голосов)

Загрузка ...

Профиль
Группа: Участник Клуба
Сообщений: 2133
Регистрация: 23.7.2006
Где: Санкт-Петербург

Репутация: 1
Всего: 92

TROFI, я плохо знаком с Билдером, но вижу один плохой момент:
методы типа:

Цитата(TROFI @ 21.9.2007, 13:21

)

c_str()

Цитата(TROFI @ 21.9.2007, 13:21

)

c_bstr()

обычно создают временные объекты, ты же получаешь на них указатели, и пытаешься потом ими пользоваться.
Что именно нужно сделать, не знаю, так как специфики Билдера не знаю.

TROFI

Дата 24.9.2007, 08:21 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 32
Регистрация: 26.10.2006
Где: ТВЕРЬ

Репутация: нет
Всего: нет

zkv, огромное спасибо за совет. Действительно, ошибка в том, что создавался временный объект. Век живи - век учись блин..... smile

TROFI

Дата 24.9.2007, 15:45 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 32
Регистрация: 26.10.2006
Где: ТВЕРЬ

Репутация: нет
Всего: нет

По моему криво, но работает только так:

Код



 DATE DateTimeAlarm;  
 BSTR SourceAlarm;    
 BSTR EventAlarm;     
 BSTR TypeAlarm;      


STDMETHODIMP TCoSimAlarmServerImpl::GetLastMessage(DATE* pDateTimeAlarm,
  BSTR* pSourceAlarm, BSTR* pEventAlarm, BSTR* pTypeAlarm)
{
  try
  {
   // Промежуточные переменные для формирования результата
   WideString ws_param1,ws_param2,ws_param3;
   BSTR bstr_param1,bstr_param2,bstr_param3;

   // Конвертирование AnsiString в WideString
   ws_param1 = WideString(MainForm->SourceAlarm.c_str());
   ws_param2 = WideString(MainForm->EventAlarm.c_str());
   ws_param3 = WideString(MainForm->TypeAlarm.c_str());

   // Конвертирование WideString в BSTR
   bstr_param1 = ws_param1.c_bstr();
   bstr_param2 = ws_param2.c_bstr();
   bstr_param3 = ws_param3.c_bstr();

   // Сохранение результата для передачи в COM методе
   DateTimeAlarm = MainForm->DateTimeAlarm;
   SourceAlarm = bstr_param1;
   EventAlarm = bstr_param2;
   TypeAlarm = bstr_param3;

   // Дата/Время
   *pDateTimeAlarm = DateTimeAlarm;

   // Источник события
   *pSourceAlarm = SourceAlarm;

   // Тескт события
   *pEventAlarm = EventAlarm;

   // Тип события
   *pTypeAlarm = TypeAlarm;
  }
  catch (Exception &e)
  {
    return Error(e.Message.c_str(), IID_ICoSimAlarmServer);
  }

  return S_OK;
}

тема закрыта....

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| C++ Builder \| Следующая тема »