Hast du die entsprechenden Prozeduren der Klasse deklariert?
Delphi-Quellcode:
constructor TUPnPDeviceFinderCallback.Create;
begin
inherited Create;
end;
procedure TUPnPDeviceFinderCallback.DeviceAdded(iFindData: Integer; UPnPDevice: UPnPDevice); stdcall;
begin
// Code
end;
procedure TUPnPDeviceFinderCallback.DeviceRemoved(iFindData: Integer; wsUDN: WideString); stdcall;
begin
end;
procedure TUPnPDeviceFinderCallback.SearchComplete(iFindData: Integer); stdcall;
begin
// Code
end;