Sugerencias?...

[rgstuamigo]

Intenta Cambiar esta parte

...
ID1 = DBEdit3->Text.ToDouble(); //LOCALIDAD
P1 = DBEdit4->Text.ToDouble(); //TRIMESTRE
ID2 = DBEdit7->Text.ToDouble(); //LOCALIDAD
P2 = DBEdit8->Text.ToDouble(); //ANO
ID3 = DBEdit11->Text.ToDouble();//LOCALIDAD
P3 = DBEdit15->Text.ToDouble(); //ANUAL
ID4 = DBEdit14->Text.ToDouble(); //CASOS
IDG = DBEdit16->Text.ToDouble();
...

por esta otra :

...
ID1 = StrToFloat(DBEdit3->Text); //LOCALIDAD
P1 = StrToFloat(DBEdit4->Text); //TRIMESTRE
ID2 = StrToFloat(DBEdit7->Text); //LOCALIDAD
P2 = StrToFloat(DBEdit8->Text); //ANO
ID3 = StrToFloat(DBEdit11->Text);//LOCALIDAD
P3 = StrToFloat(DBEdit15->Text); //ANUAL
ID4 = StrToFloat(DBEdit14->Text); //CASOS
IDG = StrToFloat(DBEdit16->Text);
...

Y prueba de nuevo y nos comentas....
Saludos...