Thema: Delphi Type von IDispatch

Einzelnen Beitrag anzeigen

Benutzerbild von Tonic1024
Tonic1024

Registriert seit: 10. Sep 2003
Ort: Cuxhaven
559 Beiträge
 
RAD-Studio 2009 Ent
 
#1

Type von IDispatch

  Alt 10. Mai 2012, 13:42
Delphi-Version: 2009
Hallo zusammen...

Ich hab mir einen Schnipsel Code nach Delphi übersetzt. Es geht um Microsoft MapPoint, falls das zukünftigen Suchenden bei der Forensuche hilft.

Im original Codeschnipsel (hab ihn leider schon verworfen, gelöscht und find ihn im netz nicht wieder) wird geprüft ob sich ein Location-Typ oder ein PushPin-Typ hinter dem IDispatch verbirgt und nur das dann auch gecasted. So wie man es normal halt auch machen würde. Das MSDN hat mir verraten, dass an der Stelle nichts Anderes vorkommen kann. Nehme ich jetzt mal ungeprüft so hin.

Meine vorläufige Lösung funktioniert zwar, ist aber irgendwie ziemlich häßlich.

Delphi-Quellcode:
    
var Loc: Location;
    Pin: PushPin;
[..]
  try
    Loc:=(GottenDispatch as Location);
  except
    Pin:=(GottenDispatch as PushPin);
  end;
Das muss doch eleganter gehen, oder? Nur so für die Code-Performance und meinen Seelenfrieden.

Gruß,

Toni
Der frühe Vogel fängt den Wurm, richtig.
Aber wird nicht auch der frühe Wurm vom Vogel gefressen?
  Mit Zitat antworten Zitat