Aktív témák

  • Fko

    tag

    Szóval az a házim builderből, hogy egy könyvtári nyilvántartó rendszer szerűséget csináljak.

    Az elején még minden jól is ment, de most egyszerűen megakadtam és nem tudom mi a baj.

    Van egy táblám :
    konyvek
    kid auto incrementes unique key
    isbn string 10 karakter
    cim string 100
    szerzoazon int
    peldanyszam int
    ev int
    kolcsonpsz int

    ilyen mezőkkel.

    Próbálok beszúrni a táblába, csináltam egy eljárást:

    void __fastcall TfrmMain::KonyvBeszur(AnsiString kisbn, AnsiString kcim ,int kszerzoazon, int kpsz, int kev) {


    frmData->qrAddKonyv->ParamByName(''k1'')->AsString = ''fd'';
    frmData->qrAddKonyv->ParamByName(''k2'')->AsString = ''fdss'';
    frmData->qrAddKonyv->ParamByName(''k3'')->AsInteger = 1;
    frmData->qrAddKonyv->ParamByName(''k4'')->AsInteger = 20;
    frmData->qrAddKonyv->ParamByName(''k5'')->AsInteger = 10;
    frmData->qrAddKonyv->ParamByName(''k6'')->AsInteger = 20;

    /* frmData->qrAddKonyv->ParamByName(''k1'')->AsString = kisbn;
    frmData->qrAddKonyv->ParamByName(''k2'')->AsString = kcim;
    frmData->qrAddKonyv->ParamByName(''k3'')->AsInteger = kszerzoazon;
    frmData->qrAddKonyv->ParamByName(''k4'')->AsInteger = kpsz;
    frmData->qrAddKonyv->ParamByName(''k5'')->AsInteger = kev;
    frmData->qrAddKonyv->ParamByName(''k6'')->AsInteger = kpsz;*/

    frmData->qrAddKonyv->ExecSQL();
    }

    Tehát a kikommentezett rész az ahogy alapból kellene működnie. A másik táblánál így tökéletesen működik.
    A felső csak egy próba, hogy mi lehet baj, de így sem megy.

    Egyszerűen én már nem tudom mit rontottam el.
    Ja és az insert:
    INSERT INTO konyvek (Isbn, Cim, Szerzoazon, Peldanyszam, Ev, Kolcsonpsz) VALUES (:k1, :k2, :k3, :k4, :k5, :k6)

    Valaki légyszíves segítsen, jövő héten kell leadnom.




Aktív témák