<![CDATA[Berechnung fehl geschlagen im String grid]]>kann mir einer Sagen wo der fehler ist bekomme nur 0 raus aus enfehrnungsberechnung

int i=1;
double L1,L2,B1,B2,e,r,w;

for(int j=0;j<list->Count;j++)
{
        if (list->Strings[j] == "$GPGGA")
                {
                //if (list->Strings[j+14] == "*") // Überprüfen ob Prüfsumme da ist
                        {
                        if (list->Strings[j+6]== "1" )//or "2" or "6")// Überprüfung der Messungsignales
                                {
                                SG1->RowCount= i;
                                SG1->Cells[0][i]= list->Strings[j]; // Satzart
                                SG1->Cells[1][i]= list->Strings[j+1];// Zeit
                                SG1->Cells[2][i]= FloatToStr(StrToFloat(StringReplace(list->Strings[j+2],".","",TReplaceFlags() << rfReplaceAll))/1000000);//Breitengrad
                                SG1->Cells[3][i]= FloatToStr(StrToFloat(StringReplace(list->Strings[j+4],".","",TReplaceFlags() << rfReplaceAll))/1000000);//Längengrad
                                SG1->Cells[4][i]= list->Strings[j+6];// Qualität
                                SG1->Cells[5][i]= list->Strings[j+7];// Sateliten
                                SG1->Cells[6][i]= list->Strings[j+8];// HDOP
                                SG1->Cells[7][i]= list->Strings[j+9];// NN
                                SG1->Cells[8][i]= list->Strings[j+11];// Höhe Geo
                                SG1->Cells[9][i]= list->Strings[j+14];// Prüfsumme
                                if (i>1)
                                {
                                B1 = (StrToFloat(SG1->Cells[2][i])/1000000)  *(M_PI/180);
                                L1 = (StrToFloat(SG1->Cells[3][i])/1000000)  *(M_PI/180);
                                B2 = (StrToFloat(SG1->Cells[2][i-1])/1000000)*(M_PI/180);
                                L2 = (StrToFloat(SG1->Cells[3][i-1])/1000000)*(M_PI/180);
                                         w = (acos( sin(B1) * sin(B2) + cos(B1) * cos(B2) * cos(L1 - L2) ));
                                         r=6378,3;
                                         e = r*w;
                                        SG1->Cells[10][i] =FloatToStr(e);
                               }
                        i++;

                        } // Überprüfung der Messungsignales
                }  // Überprüfen ob Prüfsumme da ist

Danke für die Hilfe

]]>https://www.c-plusplus.net/forum/topic/125189/berechnung-fehl-geschlagen-im-string-gridRSS for NodeTue, 28 Jul 2026 01:28:07 GMTFri, 04 Nov 2005 09:17:42 GMT60<![CDATA[Reply to Berechnung fehl geschlagen im String grid on Fri, 04 Nov 2005 09:17:42 GMT]]>kann mir einer Sagen wo der fehler ist bekomme nur 0 raus aus enfehrnungsberechnung

int i=1;
double L1,L2,B1,B2,e,r,w;

for(int j=0;j<list->Count;j++)
{
        if (list->Strings[j] == "$GPGGA")
                {
                //if (list->Strings[j+14] == "*") // Überprüfen ob Prüfsumme da ist
                        {
                        if (list->Strings[j+6]== "1" )//or "2" or "6")// Überprüfung der Messungsignales
                                {
                                SG1->RowCount= i;
                                SG1->Cells[0][i]= list->Strings[j]; // Satzart
                                SG1->Cells[1][i]= list->Strings[j+1];// Zeit
                                SG1->Cells[2][i]= FloatToStr(StrToFloat(StringReplace(list->Strings[j+2],".","",TReplaceFlags() << rfReplaceAll))/1000000);//Breitengrad
                                SG1->Cells[3][i]= FloatToStr(StrToFloat(StringReplace(list->Strings[j+4],".","",TReplaceFlags() << rfReplaceAll))/1000000);//Längengrad
                                SG1->Cells[4][i]= list->Strings[j+6];// Qualität
                                SG1->Cells[5][i]= list->Strings[j+7];// Sateliten
                                SG1->Cells[6][i]= list->Strings[j+8];// HDOP
                                SG1->Cells[7][i]= list->Strings[j+9];// NN
                                SG1->Cells[8][i]= list->Strings[j+11];// Höhe Geo
                                SG1->Cells[9][i]= list->Strings[j+14];// Prüfsumme
                                if (i>1)
                                {
                                B1 = (StrToFloat(SG1->Cells[2][i])/1000000)  *(M_PI/180);
                                L1 = (StrToFloat(SG1->Cells[3][i])/1000000)  *(M_PI/180);
                                B2 = (StrToFloat(SG1->Cells[2][i-1])/1000000)*(M_PI/180);
                                L2 = (StrToFloat(SG1->Cells[3][i-1])/1000000)*(M_PI/180);
                                         w = (acos( sin(B1) * sin(B2) + cos(B1) * cos(B2) * cos(L1 - L2) ));
                                         r=6378,3;
                                         e = r*w;
                                        SG1->Cells[10][i] =FloatToStr(e);
                               }
                        i++;

                        } // Überprüfung der Messungsignales
                }  // Überprüfen ob Prüfsumme da ist

Danke für die Hilfe

]]>https://www.c-plusplus.net/forum/post/907891https://www.c-plusplus.net/forum/post/907891Fri, 04 Nov 2005 09:17:42 GMT<![CDATA[Reply to Berechnung fehl geschlagen im String grid on Fri, 04 Nov 2005 09:21:36 GMT]]>kannste denn nicht die berechnung in ne extra-funktion auslagern und deinen code so formatieren, dass er lesbar wird? kriegt man ja augenkrebs von...

ich kann beim besten willen nicht erkennen, wo du ne entfernungsberechnung machst und vorallem von was?

]]>https://www.c-plusplus.net/forum/post/907900https://www.c-plusplus.net/forum/post/907900Fri, 04 Nov 2005 09:21:36 GMT<![CDATA[Reply to Berechnung fehl geschlagen im String grid on Fri, 04 Nov 2005 09:30:08 GMT]]>Mach mal aus 1000000 1000000.0 und aus 180 180.0. Es könnte sein, dass dein Kompiler hier Integer-Operationen verwendet (obwohl er das nicht sollte).
Dann noch aus 6378,3 6378.3.

]]>https://www.c-plusplus.net/forum/post/907909https://www.c-plusplus.net/forum/post/907909Fri, 04 Nov 2005 09:30:08 GMT<![CDATA[Reply to Berechnung fehl geschlagen im String grid on Fri, 04 Nov 2005 09:30:00 GMT]]>Hier mach ich die
[cpp]
[cpp]if (i>1)
{
B1 = (StrToFloat(SG1->Cells[2][i])/1000000) (M_PI/180);
L1 = (StrToFloat(SG1->Cells[3][i])/1000000) (M_PI/180);
B2 = (StrToFloat(SG1->Cells[2][i-1])/1000000)(M_PI/180);
L2 = (StrToFloat(SG1->Cells[3][i-1])/1000000)(M_PI/180);
w = (acos( sin(B1) * sin(B2) + cos(B1) * cos(B2) * cos(L1 - L2) ));
r=6378,3;
e = r*w;
SG1->Cells[10][i] =FloatToStr(e);[/cpp]

Cells[2] = Längengrade
Cells[3] = Breitengrade
der Rechner sollte mir dann immer aus einen Text die daten ziehen und dann bearbeiten

]]>https://www.c-plusplus.net/forum/post/907915https://www.c-plusplus.net/forum/post/907915Fri, 04 Nov 2005 09:30:00 GMT<![CDATA[Reply to Berechnung fehl geschlagen im String grid on Fri, 04 Nov 2005 09:31:53 GMT]]>siehe oben
bei r=6378,3; hat r den Wert 3. Kann sein, dass das der Fehler ist.

]]>https://www.c-plusplus.net/forum/post/907917https://www.c-plusplus.net/forum/post/907917Fri, 04 Nov 2005 09:31:53 GMT<![CDATA[Reply to Berechnung fehl geschlagen im String grid on Fri, 04 Nov 2005 09:34:42 GMT]]>r=6378,3;
nö das ist schon so richtig 6378,3 nach komma 3 kommt

]]>https://www.c-plusplus.net/forum/post/907920https://www.c-plusplus.net/forum/post/907920Fri, 04 Nov 2005 09:34:42 GMT<![CDATA[Reply to Berechnung fehl geschlagen im String grid on Fri, 04 Nov 2005 09:35:49 GMT]]>mit den Punkten hat nicht geklappt

B1 = (StrToFloat(SG1->Cells[2][i])/1000000.0)  *(M_PI/180);
                                L1 = (StrToFloat(SG1->Cells[3][i])/1000000.0)  *(M_PI/180);
                                B2 = (StrToFloat(SG1->Cells[2][i-1])/1000000.0)*(M_PI/180);
                                L2 = (StrToFloat(SG1->Cells[3][i-1])/1000000.0)*(M_PI/180);
                                         w = (acos( sin(B1) * sin(B2) + cos(B1) * cos(B2) * cos(L1 - L2) ));
                                         r=6378.3;
                                         e = r*w;
                                        SG1->Cells[10][i] =FloatToStr(e);

😞

]]>https://www.c-plusplus.net/forum/post/907921https://www.c-plusplus.net/forum/post/907921Fri, 04 Nov 2005 09:35:49 GMT<![CDATA[Reply to Berechnung fehl geschlagen im String grid on Fri, 04 Nov 2005 09:37:59 GMT]]>Hier mit r=6378,3; weist du der Variablen r den Wert 3 zu und nicht, wie du vielleicht glaubst 6378.3.
Ansonsten erzeuge erst mal double Variablen aus deinen StringGrid-Feldern und mach (wie Sunday es schon vorgeschlagen hat) eine Funktion aus deiner Berechnung. Dann geh mit dem Debugger durch.

]]>https://www.c-plusplus.net/forum/post/907922https://www.c-plusplus.net/forum/post/907922Fri, 04 Nov 2005 09:37:59 GMT<![CDATA[Reply to Berechnung fehl geschlagen im String grid on Fri, 04 Nov 2005 09:39:10 GMT]]>aber ie denn dann ???

6378.3 hab ich schon versucht

]]>https://www.c-plusplus.net/forum/post/907927https://www.c-plusplus.net/forum/post/907927Fri, 04 Nov 2005 09:39:10 GMT<![CDATA[Reply to Berechnung fehl geschlagen im String grid on Fri, 04 Nov 2005 09:40:30 GMT]]>Lies noch mal. Ich habe editiert. Am wichtigsten ist das mit dem Debugger.

]]>https://www.c-plusplus.net/forum/post/907929https://www.c-plusplus.net/forum/post/907929Fri, 04 Nov 2005 09:40:30 GMT<![CDATA[Reply to Berechnung fehl geschlagen im String grid on Fri, 04 Nov 2005 09:47:31 GMT]]>das hab ich jetzt mal ausprobiert

B1 = StrToFloat(SG1->Cells[2][i]);
                                L1 = StrToFloat(SG1->Cells[3][i]);
                                B2 = StrToFloat(SG1->Cells[2][i-1]);
                                L2 = StrToFloat(SG1->Cells[3][i-1]);
                                B1 = (B1 /1000000.0)  *(M_PI/180.0);
                                L1 = (L1/1000000.0)  *(M_PI/180.0);
                                B2 = (B2/1000000.0)*(M_PI/180.0);
                                L2 = (L2/1000000.0)*(M_PI/180.0);
                                w = (acos( sin(B1) * sin(B2) + cos(B1) * cos(B2) * cos(L1 - L2) ));
                                 r=6378.3;
                                     e = r*w;
                                        SG1->Cells[10][i] =FloatToStr(e);
]]>https://www.c-plusplus.net/forum/post/907939https://www.c-plusplus.net/forum/post/907939Fri, 04 Nov 2005 09:47:31 GMT<![CDATA[Reply to Berechnung fehl geschlagen im String grid on Fri, 04 Nov 2005 09:48:51 GMT]]>ahso klappt aber nicht ie mach ich den daraus ne funktion ?

kann mich nicht mehr drann erinnern was wir in der schule gemacht haben peinlich peinlich 🙄

]]>https://www.c-plusplus.net/forum/post/907941https://www.c-plusplus.net/forum/post/907941Fri, 04 Nov 2005 09:48:51 GMT<![CDATA[Reply to Berechnung fehl geschlagen im String grid on Fri, 04 Nov 2005 09:49:27 GMT]]>und?

]]>https://www.c-plusplus.net/forum/post/907942https://www.c-plusplus.net/forum/post/907942Fri, 04 Nov 2005 09:49:27 GMT<![CDATA[Reply to Berechnung fehl geschlagen im String grid on Fri, 04 Nov 2005 09:51:21 GMT]]>ne klappt leider nicht 😕

]]>https://www.c-plusplus.net/forum/post/907949https://www.c-plusplus.net/forum/post/907949Fri, 04 Nov 2005 09:51:21 GMT<![CDATA[Reply to Berechnung fehl geschlagen im String grid on Fri, 04 Nov 2005 09:51:26 GMT]]>vielleicht das nächste mal mitschreiben? ganz hilfreich wäre ja auch mal die formel bzw. die daten zu sehen, die deiner berechnung zu grunde liegen.

double CalculateDistance(/* Parameterliste */)
{
  // Berechnung durchfuehren und zurueckgeben
}
]]>https://www.c-plusplus.net/forum/post/907950https://www.c-plusplus.net/forum/post/907950Fri, 04 Nov 2005 09:51:26 GMT<![CDATA[Reply to Berechnung fehl geschlagen im String grid on Fri, 04 Nov 2005 09:56:13 GMT]]>Kann ich dir leider nicht geben wil die unsortiert in einem Txt bzw sortiert dann in einem Stringrid sind ich kann aber mal ein Bsp machen

1 Breitengrad : 51,898422..
1 Längengrad : 7,5682254...
das ist L1 und B1 , B2 und L2 sehen genau so aus

]]>https://www.c-plusplus.net/forum/post/907959https://www.c-plusplus.net/forum/post/907959Fri, 04 Nov 2005 09:56:13 GMT<![CDATA[Reply to Berechnung fehl geschlagen im String grid on Fri, 04 Nov 2005 10:06:20 GMT]]>Kann es sein, dass in den Zellen deines StringGrids auch Kommas drin sind? Ersetze die mal durch Punkte. Was soll eigentlich diese Division durch 1000000?

]]>https://www.c-plusplus.net/forum/post/907971https://www.c-plusplus.net/forum/post/907971Fri, 04 Nov 2005 10:06:20 GMT<![CDATA[Reply to Berechnung fehl geschlagen im String grid on Fri, 04 Nov 2005 10:12:49 GMT]]>Das Problem ist ich bekomme die koordinaten mit

Breitengrad :5189.5842
dann suche ich den Punkt und ersetze in

51895842 /100000 = 51,81 das ist dan rein rechnerisch so richtig

die 51895.. sind bis dahin auch double

]]>https://www.c-plusplus.net/forum/post/907979https://www.c-plusplus.net/forum/post/907979Fri, 04 Nov 2005 10:12:49 GMT<![CDATA[Reply to Berechnung fehl geschlagen im String grid on Fri, 04 Nov 2005 10:14:52 GMT]]>warum ersetzt du den punkt?

]]>https://www.c-plusplus.net/forum/post/907983https://www.c-plusplus.net/forum/post/907983Fri, 04 Nov 2005 10:14:52 GMT<![CDATA[Reply to Berechnung fehl geschlagen im String grid on Fri, 04 Nov 2005 10:17:33 GMT]]>weil der so aus meinem GPS gerät kommt und das nicht ganz richtig ist vom rechnen her.

es sind nämilch hier 51°, 5847...... deswegen muß der Punkt weg

]]>https://www.c-plusplus.net/forum/post/907986https://www.c-plusplus.net/forum/post/907986Fri, 04 Nov 2005 10:17:33 GMT<![CDATA[Reply to Berechnung fehl geschlagen im String grid on Fri, 04 Nov 2005 10:18:16 GMT]]>😉 Danke noch mal für die Hilfe

]]>https://www.c-plusplus.net/forum/post/907987https://www.c-plusplus.net/forum/post/907987Fri, 04 Nov 2005 10:18:16 GMT<![CDATA[Reply to Berechnung fehl geschlagen im String grid on Fri, 04 Nov 2005 10:19:36 GMT]]>in einem anderen Programm klappt das

void __fastcall TForm1::Button3Click(TObject *Sender)
{
double e,B1,B2,L1,L2;

B1 = StrToFloat(Edit1->Text);
B2 = StrToFloat(Edit3->Text);
L1 = StrToFloat(Edit2->Text);
L2 = StrToFloat(Edit4->Text);

e = (acos(sin(B1*(M_PI/180)) * sin(B2*(M_PI/180)) + cos(B1*(M_PI/180)) * cos(B2*(M_PI/180)) * cos((L1*(M_PI/180)) - (L2*(M_PI/180)))))*6378,3;
Edit5->Text =FloatToStr(e);
]]>https://www.c-plusplus.net/forum/post/907989https://www.c-plusplus.net/forum/post/907989Fri, 04 Nov 2005 10:19:36 GMT<![CDATA[Reply to Berechnung fehl geschlagen im String grid on Fri, 04 Nov 2005 10:25:36 GMT]]>JA ES KLAPPT !!!!
Hab mal das andere Programm genommen und es verknüft jetzt klappt es

if (i>1)
                                {
                                B1 = StrToFloat(SG1->Cells[2][i]);
                                L1 = StrToFloat(SG1->Cells[3][i]);
                                B2 = StrToFloat(SG1->Cells[2][i-1]);
                                L2 = StrToFloat(SG1->Cells[3][i-1]);
                                e = (acos(sin(B1*(M_PI/180)) * sin(B2*(M_PI/180)) + cos(B1*(M_PI/180)) * cos(B2*(M_PI/180)) * cos((L1*(M_PI/180)) - (L2*(M_PI/180)))))*6378,3;
                                       SG1->Cells[10][i] =FloatToStr(e);

}

]]>https://www.c-plusplus.net/forum/post/907998https://www.c-plusplus.net/forum/post/907998Fri, 04 Nov 2005 10:25:36 GMT