Mehrere Webservices und Shared-types

[Sergej_Molotov]

Aber genau das möchte ich nicht.

Dieses TBla wird generell als DTO (Daten-Transfer-Object) verwendet und in eine andere Klasse konvertiert. Ich müsste dazu Konverterier-Routine duplizieren und wenn ich Webservice-Funktionen befüttern möchte, müssten ich dann ebenfalls zwei (n) Funktionen zum Konvertieren zu einen DTO erstellen, die das identische machen.

Es beseht eigentlich das Problem, das WSDLImp.exe die Typen in die selbe Unit generiert und nicht in separate Unit-Files. Java macht dieses natürlich und bei C# tauchen mehrere Services in einem Namespace auf.

[himitsu]

Dann kannst du die Typen wohl nur noch ableiten.

Delphi-Quellcode:

type
  //TBlaBla = Unit1.TBla;  -> ohne Type wird nur ein Alias angelegt, aber für den Compiler und die RTTI bleibt es ein TBla aus der Unit Unit1
  TBlaBla = type Unit1.TBla;
  TBlaBlub = type Unit2.TBla;

function GetBla: TBlaBla;
function GetBlub: TBlaBlub;

[mjustin]

Zitat von Sergej_Molotov:

Aber genau das möchte ich nicht.

Dieses TBla wird generell als DTO (Daten-Transfer-Object) verwendet und in eine andere Klasse konvertiert. Ich müsste dazu Konverterier-Routine duplizieren und wenn ich Webservice-Funktionen befüttern möchte, müssten ich dann ebenfalls zwei (n) Funktionen zum Konvertieren zu einen DTO erstellen, die das identische machen.

Wenn ich es richtig verstehe soll dies gescheehen:

Delphi-Quellcode:

function Convert(const ABla: Unit1.TBla): TMeineAndereKlasse;
begin
  Result := TMyAndereKlasse.Create;

  // ... fülle Result mit Daten aus ABla (Typ aus Unit1)
end;

function Convert(const ABla: Unit2.TBla): TMeineAndereKlasse;
begin
  Result := TMyAndereKlasse.Create;

  // ... fülle Result mit Daten aus ABla (Typ aus Unit2)
end;

Ich habe keine Lösung, aber ich bewundere das Problem