Geschrieben March 17, 2013 at 18:4917. Mär 2013 { Get current temperature (unit is °C/100) } //t1_val := StringReplace (FloatToStrF(t1.GetTemperature/100 + t1_Korr, ffFixed, 8,2),'.',',',[rfReplaceAll]) ; //t2_val := StringReplace (FloatToStrF(t2.GetTemperature/100 + t2_Korr, ffFixed, 8,2),'.',',',[rfReplaceAll]) ; t3_val := StringReplace (FloatToStrF(t3.GetTemperature/100 + t3_Korr, ffFixed, 8,2),'.',',',[rfReplaceAll]) ; t4_val := StringReplace (FloatToStrF(t4.GetTemperature/100 + t4_Korr, ffFixed, 8,2),'.',',',[rfReplaceAll]) ; t5_val := StringReplace (FloatToStrF(t5.GetTemperature/100 + t5_Korr, ffFixed, 8,2),'.',',',[rfReplaceAll]) ; t6_val := StringReplace (FloatToStrF(t6.GetTemperature/100 + t6_Korr, ffFixed, 8,2),'.',',',[rfReplaceAll]) ; { get pressure & humidity } //h1_val := StringReplace (FloatToStrF(h1.GetHumidity/10 + h1_Korr, ffFixed, 8,2),'.',',',[rfReplaceAll]) ; //b1_val := StringReplace (FloatToStrF(b1.GetAirPressure/1000 + b1_Korr, ffFixed, 8,2),'.',',',[rfReplaceAll]) ; If h1 or/and b1 will be (more than 4 brickletts) requested there is an exception: External: SIGSEGV ... end; errorCode := GetErrorCodeFromData(result); if (errorCode = 0) then begin ... This occures in all combinations.
Geschrieben March 17, 2013 at 20:3917. Mär 2013 So the h1_val throws an exception if you comment it in, but it doesnt if you comment out te tX_val lines? That doesn't make sense . Can you make a minimal Program (including the initialization and so) that causes the exception?
Geschrieben March 18, 2013 at 21:0618. Mär 2013 Autor Solved! Lazarus was confused. After restarting Lazarus and new compiler run all works fine.
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.