Invalid Variant Operation Exception Trying to Access OleVariant in Delphi - Works in C# -

Invalid Variant Operation Exception Trying to Access OleVariant in Delphi - Works in C# -

I am trying to access an universal callback that is coming from an ActiveX library.

The event handler is defined as TLB:

  process (AS & T: TBYX; var structureQNAP: {? StrictVTQNAP} wet variant); Here is the definition of structVTIQSnap in TLB:    structVTIQSnap = pack records bstrSymbol: WideString; BstrListingExch: Widestring; BstrLastExch: WideString; FLastPrice: Double; NLastSize: integer; BstrBbo: Widestring; BstrBidExch: WideString; FBIDPrice: Double; NBidSize: Integer; BstrAskExch: Widestring; FAskPrice: Double; NAskSize: integer; FHighPrice: Double; Fallpreet: Double; FOpenPrice: Double; FClosePrice: Double; NCumVolume: integer; BstrTradeCondition: Widestring; NQuoteCondition: Integer; BstrCompanyName: Widestring; F52WeekHigh: Double; F52WeekLow: Double; FPS: Double; NSharesOutstanding: integer; NSpCode: integer; FB eta: Double; BstrExDivDate: WideString; NDivFreq: Integer; FDivAmt: Double; Navigolum: integer; Bstr Cookie: Widestring; Fwap: double; BstrUpdateTime: WideString; BstrExch: WideString; NSharesPerContract: Integer; End; It compiles ok, but every time I try to reach bstrSymbol, I get an "invalid type of operation":    process TForm1.HandleVTIQuoteSnap (Acedor: Tuboject; var StructureCaps: Oliverient); Var Symbol: Widestring; Start symbol: = structQSnap.bstrSymbol; // This line exception causes the end;  
  How do I use the QSnap structure and its properties in Delphi? 
  In C #, this function works fine for event handlers: 
   Void vtiQ_OnVTIQSnap (referee vtiLib.structVTIQSnap structQSnap) {MessageBox.Show (for " Qsnap found + structQuoteSnap.bstrSymbol); }  
  Any ideas?

  
  I think Delphi's ActiveX import wizard does not know how to fix structVTIQSnap type ( Which seems to be a record) is okay and only uses default olywant? Is there a type of declaration called structVTIQSnap or generated ... _ TLB.pas file similar? Try using that instead of OleVariant, for example. 
   Process (ester: tubet; var structQSnap: structVTIQSnap) of the object;  
  The type will probably be declared as a "pack record".








03:22

















Get link





Facebook





X





Pinterest





Email





Other Apps




Comments





Post a Comment








Popular Posts




linux - C++: undefined reference to `sd_notify' -



    i'm new c++. problem have process creates lot of processes, want identify(get pid) of 1 of children. looping through children take lot of resources(don't ask why). i'm trying pid of process (somehow) identifying if uses sd_notify  , pid(i don't if possible). i'm using ubuntu 14.04 , created little test program:   #include <systemd/sd-daemon.h> #include <stdio.h>  int main() {   int a;   = sd_notify(0, "ready=1");   printf("%d -> \n", a);   fflush(stdout); }   but gives me error saying undefined reference 'sd_notify' .   p.s  found sd_notify  systemd systems. equivalent of in upstart systems? or how can make sure process i'm searching doen't use function? or possible log messages send processes using sd_notify ?          try installing libsystemd-daemon-devel  , compile using   g++ -o sig sig.cpp -lsystemd-daemon       











server - Httpd(apache) is not starting on fedora 23 -



    i tried install nginx , didn't work. after tried install , configure apache(httpd) server on fedora23 dist. server doesn't want start namely doesn't work , returns errors , when try start it: sudo systemctl start httpd  job httpd.service failed because control process exited error code. see "systemctl status httpd.service" , "journalctl -xe" details.   , after saw logs in journalctl -xe . shows this:       jun 28 11:26:49 cyber audit[15981]: cred_refr pid=15981 uid=0 auid=1000 ses=1 subj=unconfined_u:unconfined_r:unconfined_t:s0-s0:c0.c1023 msg='op=pam:s jun 28 11:26:49 cyber sudo[15981]: pam_systemd(sudo:session): cannot create session: running in session jun 28 11:26:49 cyber kernel: audit: type=1105 audit(1467095209.363:842): pid=15981 uid=0 auid=1000 ses=1 subj=unconfined_u:unconfined_r:unconfined_t: jun 28 11:26:49 cyber sudo[15981]: pam_unix(sudo:session): session opened user root (uid=0) jun 28 11:26:49 cyber audit[15981]: user_start pid=1...






ios - Swift: Realm accessed from incorrect thread -



    i pass previous view controller. want show data save in other view controller.       override func prepareforsegue(segue: uistoryboardsegue, sender: anyobject?) {     if (segue.identifier == "beacons") {           let nav = segue.destinationviewcontroller as! uinavigationcontroller         let svc = nav.topviewcontroller as! beaconcharacteristicviewcontroller         svc.selectedlist = sender as! beacons       }   and         var selectedlist : beacons!   and code error reason.   i don't use primary key or have use it.       func loadproperties(){        let beacons = selectedlist        let priority = dispatch_queue_priority_default        dispatch_async(dispatch_get_global_queue(priority, 0)) {          do{             try uirealm.write({ () -> void in                  beacons.uuid = self.beaconuuid.text!                 print("uuid = \(beacons.uuid)")                  beacons.major = self.beaconmajor.text!                 print("uuid = \(beacons.u...








Powered by Blogger