Typcasting korrelt ausführen, wie?

[himitsu]

FPC kennt doch auch irgendwie Generics?

TList<TmySelectableItem> und schon hat man eine Liste, mit automatischem Cast ... muß man selbst nichts machen und macht dadurch auch keine Fehler.



Und dann SoftCasts, anstatt HardCasts, zu mindestens so lange du nicht weißt was wo wie richtig ist (kann man ja später aus Performancegründen wieder umdrehen).
Der Compiler meckert nur, wo es komplett inkompatibel wird, wenn man z.B. direkt TmySelectableItems zu TmySelectBox casten will.
Schon sagt dir zur Laufzeit das Programm auch, wenn wo Intern was falsch läuft. z.B. TmySelectableItems zu TmySelectBox casten, aber mit TObjekt oder Pointer als Zwischentypen.

Delphi-Quellcode:

// statt 
TmySelectableItem(xxx.Items[i])

(xxx.Items[i] as TmySelectableItem)
// bzw.
(TObject(xxx.Items[i]) as TmySelectableItem)  // wenn es ein Pointer ist und AS nicht direkt geht

[itblumi]

Generics sind in FPC und Delphi unterschiedlich da FPC schon viel länger Generics implementiert als Delphi.
Man kann aber FPC im Mode Delphi compilieren und dann kann man das genau wie in Delphi umsetzen.

Code:

{$mode Delphi}

TMyGenericList = class(TList<TmySelectableItem>)
end;

{$mode ObjFPC}

TSMyGenericList = specialize TList<TmySelectableItem>;

TMyGenericList = class(TSMyGenericList)
end;

Ich persönlich bevorzuge da die Delphi Variante, da ich viel weniger schreiben muss.

[himitsu]

FPC wird doch bestimmt auch CodeTemplates kennen?
Da könntest dir ja ein Template für erstellen.

So geht es nicht?
TMyGenericList = class(specialize TList<TmySelectableItem>)

Wenn doch, dann
TMyGenericList = class({$IFDEF FPC}specialize{$ENDIF} TList<TmySelectableItem>)
OK, wegen dem $MODE dann wohl irgendwie so
TMyGenericList = class({$IF Defined(FPC) and not Defined(DelphiMode)}specialize{$IFEND} TList<TmySelectableItem>)

[itblumi]

Nein leider nicht ich wollte dies auch gern so in meiner anderen Klasse umsetzen,
aber das key Wort specialize darf leider nicht in einer Klassen Ableitung eingesetzt werden.

[itblumi]

Da bleibt dann nur die Variante den Mode der ganzen unit zu switchen oder halt die andere schreibweise zu benutzen.

[delphifan2004]

Danke Euch allen für Eure Antworten und Anregungen, jetzt guck ich mir das alles noch mal an.

[JamesTKirk]

Zitat von himitsu:

FPC wird doch bestimmt auch CodeTemplates kennen?
Da könntest dir ja ein Template für erstellen.

FPC ist nur der Compiler. Das Äquivalent zu CodeTemplates wird von der IDE bereitgestellt und zumindest Lazarus unterstützt diese.

Zitat von himitsu:

Wenn doch, dann
TMyGenericList = class({$IFDEF FPC}specialize{$ENDIF} TList<TmySelectableItem>)
OK, wegen dem $MODE dann wohl irgendwie so
TMyGenericList = class({$IF Defined(FPC) and not Defined(DelphiMode)}specialize{$IFEND} TList<TmySelectableItem>)

Korrekterweise wäre es {$IF Defined(FPC) and not Defined(FPC_DELPHI)}specialize{$IFEND}

Zitat von itblumi:

Nein leider nicht ich wollte dies auch gern so in meiner anderen Klasse umsetzen,
aber das key Wort specialize darf leider nicht in einer Klassen Ableitung eingesetzt werden.

Seit FPC 3.2.0 geht das.

[himitsu]

Ja sorry, Lazarus natülich.

Wir sind hier einfach zu verwöhnt, da hier im Delphi die Sprache, der Compiler und die IDE gleich heißen.

OK, die Sprache hieß früher mal Pascal, vor Delphi (als die IDE noch Turbo Pascal hieß, bzw. PolyPascal, davor BLS-Pascal und zu Begin nur Pascal) und inzwischen heißt sie seit wenigen Jahren nun offiziell "Delphi Language" (weil die Sprache hat sich weiterentwickelt und ist nun was Besseres Anderes), auch wenn scheinbar fast niemand diese Bezeichnung benutzt.
Und ja, die IDE heißt intern immernoch noch anders, nämlich so, wie Delphi ursprünglich mal heißen sollte, also TAppBuilder, aber durch einen glücklichen Zufall fiel kurz vor Veröffentlichung auf das Er bereits vergeben war.