Jump to content
Sign in to follow this  
tgibson

FSUIPC DELPHI

Recommended Posts

Guest

Can anyone help me, please? I did some changes in FSUIPC_SDK for Delphi, as the following code and, although I had followed SDK's documentation, the results were not the expected. Can anybody explain me what is wrong? vardwResult : DWORD;LatHi,LatLo,LongHi,LongLo,AltHi,Heading : Integer;rLatHi,rLatLo,rLongHi,rLongLo,rAltHi,rHeading : Real;ResultLatitude,ResultLongitude : Real;begin if FSUIPC_Read($0564, 8, @LatHi, dwResult) and FSUIPC_Read($0560, 8, @LatLo, dwResult) and FSUIPC_Read($056C, 8, @LongHi, dwResult) and FSUIPC_Read($0568, 8, @LongLo, dwResult) then begin rLatHi := (LatHi / (90 * 10001750); rLatLo := ((LatLo / (90 * 10001750) / 4294967296; ResultLatitude:= rLatHi + rLatLo; LabelLat.Caption := FloatToStr(ResultLatitude); rLongHi := LongHi / (360 * 4294967296); rLongLo := LongLo / (360 * 4294967296); ResultLongitude := rLongHi + rLongLo; LabelLong.Caption := FloatToStr(ResultLongitude); end; if FSUIPC_Read($0580, 1, @Heading, dwResult) then begin rHeading := Heading / 65536; LabelHeading.Caption := FloatToStr(rHeading); end; end; Thank you!

Share this post


Link to post
Share on other sites

I believe you posted this message to the wrong forum. This forum is for tools used to generate AI traffic.Hope this helps,-- Tom GibsonCalifornia Classic Propliners: http://www.calclassic.com/Cal Classic Alco Page: http://www.calclassic.com/alco/Freeflight Design Shop: http://www.freeflightdesign.com/ San Diego Model RR Museum: http://www.sdmodelrailroadm.com/Drop by! ___x_x_(")_x_x___

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
Sign in to follow this  

  • Tom Allensworth,
    Founder of AVSIM Online


  • Flight Simulation's Premier Resource!

    AVSIM is a free service to the flight simulation community. AVSIM is staffed completely by volunteers and all funds donated to AVSIM go directly back to supporting the community. Your donation here helps to pay our bandwidth costs, emergency funding, and other general costs that crop up from time to time. Thank you for your support!

    Click here for more information and to see all donations year to date.
×
×
  • Create New...