Registriert seit: 5. Jan 2005
Ort: Stadthagen
9.454 Beiträge
Delphi 10 Seattle Enterprise
|
AW: Vererbung mit mehrfach eingeschränktem TypParamater
19. Mai 2014, 12:28
Du hast - immer noch nicht die Delphi-Tags verwendet
- bei Klasse0<T:IKlasse1,IKlasse2>
angegeben, dass du genau einen Typ-Parameter angeben möchtest und versuchst dort jetzt zwei anzugeben
So geht es (aber ich weiß nicht, ob es das ist, was du willst)
Delphi-Quellcode:
program dp_180380;
{$APPTYPE CONSOLE}
{$R *.res}
uses
System.SysUtils;
type
IKlasse1 = interface
[' {E90AABBF-1711-4E09-AD38-63A6F53C2DBA}']
end;
IKlasse2 = interface
[' {8D8349B5-F5C2-4F85-9DAC-606D7307667A}']
end;
TKlasse0<T : IKlasse1, IKlasse2> = class( TInterfacedObject )
end;
TKlasse = class( TInterfacedObject, IKlasse1, IKlasse2 )
end;
TKlasse1 = class( TKlasse0<TKlasse> )
end;
begin
try
{ TODO -oUser -cConsole Main : Code hier einfügen }
except
on E : Exception do
Writeln( E.ClassName, ' : ', E. Message );
end;
end.
Kaum macht man's richtig - schon funktioniert's
Zertifikat: Sir Rufo (Fingerprint: ea 0a 4c 14 0d b6 3a a4 c1 c5 b9 dc 90 9d f0 e9 de 13 da 60)
Geändert von Sir Rufo (19. Mai 2014 um 12:36 Uhr)
|