Mein erster Gedanke war auch: Doch, genau so funktioniert es.
Zeig uns doch mal etwas mehr Code und die Fehlermeldung.
Delphi-Quellcode:
[...schnipp...]
Procedure Callback(pAddr:PAmsAddr; pNotification:PAdsNotificationHeader; hUser:Longword); stdcall;
begin
//mache irgendwas
//beim Aufruf der Prozedur soll in hUser der Zeiger der Klasseninstanz stehen
end;
[...schnipp...]
Das ist die Methode, die ich aus der Library aufrufe:
Delphi-Quellcode:
[...schnipp...]
result := AdsSyncAddDeviceNotificationReq( @serverAddr, ADSIGRP_DEVICE_DATA,
ADSIOFFS_DEVDATA_ADSSTATE,
@adsNotificationAttrib,
@Callback, //hier steht die Adresse der Callback-Routine
Longword(@???), //an dieser Stelle will ich den Zeiger der Klasseninstanz übergeben
@hDevNotification );
[...schnipp...]
Hier steht das Beispiel, an dem ich mich orientiert habe:
http://infosys.beckhoff.com/index.ph...4.htm&id=10260