AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

DispInterface in Programm nutzen?

Ein Thema von Salomon · begonnen am 12. Jul 2004 · letzter Beitrag vom 12. Jul 2004
Antwort Antwort
Benutzerbild von Salomon
Salomon

Registriert seit: 9. Jun 2002
453 Beiträge
 
#1

DispInterface in Programm nutzen?

  Alt 12. Jul 2004, 09:18
Hallo,
ich versuche zur Zeit Map & Guide Routingfunktionalität in ein Delphi Programm zu integrieren. Um auf die Funktionen und Attribute zuzugreifen binde ich eine vorgefertigte Unit ein.

In dieser sind viele Deklarationen folgender Art. Wie kann ich diese jedoch nun in meinem Programm nutzen? Im konkreten Beispiel möchte ich z.B. in meinem Programm auf das OnRouteCalculated event reagieren.

Delphi-Quellcode:
// *********************************************************************//
// DispIntf: IMGCRoutingEvents
// Flags: (4096) Dispatchable
// GUID: {1230E29A-F89D-41F0-B65C-E0675451ECF6}
// *********************************************************************//
  IMGCRoutingEvents = dispinterface
    ['{1230E29A-F89D-41F0-B65C-E0675451ECF6}']
    procedure OnRouteCalculated(success: WordBool); dispid 1;
    procedure OnOptimized(success: WordBool); dispid 2;
    procedure OnWayPointsChanged; dispid 3;
    procedure OnOptionsChanged; dispid 4;
    procedure OnRouteReseted; dispid 5;
  end;
Thanx Salomon
01001000 01100001 01101100 01101100 01101111
01010111 01100101 01101100 01110100 00100001

http://www.it-adviser.net
  Mit Zitat antworten Zitat
neolithos

Registriert seit: 31. Jul 2003
Ort: Dresden
1.386 Beiträge
 
Delphi 7 Architect
 
#2

Re: DispInterface in Programm nutzen?

  Alt 12. Jul 2004, 09:28
Das war relativ knifflig.

Aber du mist eine EventDispatch (IUnknown, IDispatch) programmieren. Welches via Invoke die Nachrichten erhält.

Da das relative viel zu erklären ist! Schau doch mal die Excel-Automationsdateien an (vorallem OleServer.pas). Dort ist sowas implementiert.
- ciao neo -
Es gibt niemals dumme Fragen, sondern nur dumme Antworten!
  Mit Zitat antworten Zitat
Benutzerbild von Salomon
Salomon

Registriert seit: 9. Jun 2002
453 Beiträge
 
#3

Re: DispInterface in Programm nutzen?

  Alt 12. Jul 2004, 09:43
Danke für die Hinweise, schau ich mir gleich mal an.

Wenn ich dann konkretere Fragen habe werde ich dich als Experten nerven

Thanx Salomon
01001000 01100001 01101100 01101100 01101111
01010111 01100101 01101100 01110100 00100001

http://www.it-adviser.net
  Mit Zitat antworten Zitat
Benutzerbild von Bernhard Geyer
Bernhard Geyer

Registriert seit: 13. Aug 2002
17.171 Beiträge
 
Delphi 10.4 Sydney
 
#4

Re: DispInterface in Programm nutzen?

  Alt 12. Jul 2004, 09:44
I. d. R. wird vom Delphi-TLB-Importer eine Wrapper-Klasse erstellt, welche die Events als "normale" Delphi-Events in der generierten Wrapper-Klasse bereitstellt.

Falls der Delphi-Automatismus nicht funktioniert, so kannst Du ja mal EventSink von Binh Ly ausprobieren. Damit sollte es auf jedenfall (bisher keine Probleme) gehen.
  Mit Zitat antworten Zitat
Benutzerbild von Salomon
Salomon

Registriert seit: 9. Jun 2002
453 Beiträge
 
#5

Re: DispInterface in Programm nutzen?

  Alt 12. Jul 2004, 09:54
Die Wrapper Klasse konnte ich mit dem TLB Importer schon anlegen. Wir haben hier in Firma aus Sicherheitsgründen nur einen zentralen I-Net Zugang Ich probiers dannn mal weiter und schau gegen Mittag hier nochmal rein.
01001000 01100001 01101100 01101100 01101111
01010111 01100101 01101100 01110100 00100001

http://www.it-adviser.net
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 07:58 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz