powered by simpleCommunicator - 2.0.59     © 2025 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Одинаковое наименование типов в разных юнитах
3 сообщений из 3, страница 1 из 1
Одинаковое наименование типов в разных юнитах
    #40084555
genok
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
всем привет
столкнулся с затыком, и чет не соображу что делать пока
есть два юнита, создал их из wsdl партнерского сервиса. PixService.pas и EmkService.pas
и в каждом прописан тип
VersionInfo2 = class(TRemotable)

в моем коде мне нужно последовательно использовать оба сервиса, соответственно, в uses прописаны оба юнита

В этом коде я пытаюсь получить версию Pix
Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
var
   ver2: VersionInfo2;
begin
  try
    ver2:= Pix.GetVersion;
    WriteLog('DatabaseVersion: '+ver2.DatabaseVersion, 0);
    WriteLog('ServiceVersion: '+ver2.ServiceVersion, 0);
  except
    on E: Exception do WriteLog(E.ClassName+': '+E.Message, 2); // red
  end;



и все чудно прокатывает
но как только я делаю то же самое для EMK то получаю ошибку
[DCC Error] DataM.pas(357): E2010 Incompatible types: 'PixService.VersionInfo2' and 'EMKService.VersionInfo2'

ну и если в uses поменять местами PixService и EmkService то всё чудно работает для EMK

вопрос: можно ли в var указать явно, из какого юнита взять тип для создания переменной?
...
Рейтинг: 0 / 0
Одинаковое наименование типов в разных юнитах
    #40084556
x1ca4064
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
genok


вопрос: можно ли в var указать явно, из какого юнита взять тип для создания переменной?


ИмяМодуля.ИмяТипа
...
Рейтинг: 0 / 0
Одинаковое наименование типов в разных юнитах
    #40084557
genok
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
x1ca4064,

прокатило, спасибо
...
Рейтинг: 0 / 0
3 сообщений из 3, страница 1 из 1
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Одинаковое наименование типов в разных юнитах
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]