Hallo,
ich muss ein Prüfgerät mittels
DCOM automatisieren. Grundsätzlich funktioniert es schon gut.
Leider hat der Prüfanlagenhersteller an einer Stelle eine Methode (Order) für zwei Typen(IOrder und IBatch) zusammengefasst:
aus Handbuch:
HRESULT Order([out, retval] IOrder **ppOrder):
Get pointer to Order object
Order object manages interfaces IOrder and IBatch
In einem Beispiel in Visual Basic funktioniert es so:
Private Sub btnCreateBatch_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles btnCreateBatch.Click
Dim m_IOrder As QvDefinition.IOrder
Dim m_IBatch As QvDefinition.IBatch
m_IOrder = m_QvAutomation.Order //Get pointer to Order object
m_IBatch = m_IOrder
...
In Delphi erhalte ich beim Übersetzen den Fehler "Inkompatible Typen: 'IOrder' und 'IBatch'":
Delphi-Quellcode:
procedure TForm1.BtnCreateBatchClick(Sender: TObject);
var m_IOrder : iorder;
m_IBatch : IBatch;
begin
m_IOrder := m_QvAutomation.Order; //Get pointer to Order object
m_IBatch := m_Iorder; //[Fehler] TestU.pas(244): Inkompatible Typen: 'IOrder' und 'IBatch'
{...}
end;
Wie kann ich in Delphi die Variable unterschiedlichen Typs zuweisen wie im Basicprogramm?
Viele Grüße
windmaster