Thema: Delphi Generische Listen

Einzelnen Beitrag anzeigen

webcss

Registriert seit: 10. Feb 2006
255 Beiträge
 
Delphi XE2 Professional
 
#7

AW: Generische Listen

  Alt 30. Nov 2011, 18:35
Also, Du kannst Dir natürlich auch mit folgender function behelfen, solange Dein Typ T eine einfache Klasse ist:

Delphi-Quellcode:
function GetGenericType(const AName: string): TRTTIType;

   function ExtractQualifiedName(const AName: string):string;
   var i: integer;
   begin
     i:= succ(pos('<', AName));
     Result:= copy(AName, i, pos('>', AName)-i);
   end;

var lCTX: TRTTIContext;
begin
  Result:= lCTX.FindType(ExtractQualifiedName(AName));
end;
Ist zwar 'ne Krücke, funktioniert aber prima in D2010!
"Wer seinem Computer Mist erzählt, muss immer damit rechnen..." (unbekannt)
"Der Computer rechnet damit, dass der Mensch denkt..." (auch unbekannt)
mein blog
  Mit Zitat antworten Zitat