1 2 3 4 5 6 7 8 9 10 11 12 13
| void __fastcall TfParcoursParcours::pParcoursMouseDown(TObject *,
TMouseButton Button, TShiftState, int X, int Y)
{
if (FMode == isSel && Button==mbLeft) {
dtTablePrimaire->Insert(); //// -------------->>>> L'exception est levée ici
TPoint P = FImage->UniversalPoint(TPoint(X,Y));
dtTablePrimairePosX->Value = P.x;
dtTablePrimairePosY->Value = P.y;
dtTablePrimaireType_Bouee_id->Value = dtTypeBoueeid->Value;
dtTablePrimaire->Post();
FImage->Attribut->DataSet = FImage->Attribut->DataSet;
}
} |
Partager