hongfox입니다.

Oracle을 사용할때 저는 이렇게 사용했습니다.
Paradox는 예전에 사용하고 사용하지를 않아서....

         AnsiString strSQL;
         strSQL = "insert into partner";
         strSQL += "(name,section,society_num,boss_name,kind_1,kind_2,home_tel,handphone,post,addr1,addr2,cuff)";
         strSQL += "values('";
         strSQL += p1->Text;
         strSQL += "', '";
         strSQL += p2->Text;
         strSQL += "', '";
         strSQL += p3->Text;
         strSQL += "', '";
         strSQL += p4->Text;
         strSQL += "', '";
         strSQL += p5->Text;
         strSQL += "', '";
         strSQL += p6->Text;
         strSQL += "', '";
         strSQL += p7->Text;
         strSQL += "', '";
         strSQL += p8->Text;
         strSQL += "', '";
         strSQL += p9->Text;
         strSQL += "', '";
         strSQL += p10->Text;
         strSQL += "', '";
         strSQL += p11->Text;
         strSQL += "', ";
         strSQL += StrToInt(p1->Text);
         strSQL += " ";

        Q_partner->Close();
        Q_partner->SQL->Clear();
         Q_partner->SQL->Add(strSQL);
         __try{
             try{
                     Q_partner->ExecSQL();
                 }

             catch (Exception &E)
                 {
                     ShowMessage( E.Message);
                 }
         }

         __finally{
              partner_refresh();
              }

이렇게하면 될것 같네요....

그럼....

구영모 님이 쓰신 글 :
: 요즘 쪼끔만 db프로그램 함 만들어 보는데요..
:
: 음...장난이 아니네여..ㅡ.ㅡ
:
:
: 디비는 파라독스를 쓰는데...
: 다른필드 다 string으로 했는데...하나는 Number로 만들었어여...이름은 cuff...
: 그리고 폼에서 Edit로 입력을 받아서 디비에 저장을 하는데....
:
: 이게 계속 Type mismatch라네여...ㅡ.ㅡ
: 계속 보는데....모..르..겠..어..여...ㅡ.ㅡ
:
:         Q_partner->Close();
:         Q_partner->SQL->Clear();
:         Q_partner->SQL->Add("insert into partner");
:         Q_partner->SQL->Add(" (name,section,society_num,boss_name,kind_1,kind_2,home_tel,handphone,post,addr1,addr2,cuff)");
:         Q_partner->SQL->Add("values");
:         Q_partner->SQL->Add(" (:a1,:a2,:a3,:a4,:a5,:a6,:a7,:a8,:a9,:a10,:a11,:a12)");
:
:         Q_partner->ParamByName("a1")->AsString = p1->Text ;
:         Q_partner->ParamByName("a2")->AsString = p2->Text ;
:         Q_partner->ParamByName("a3")->AsString = p3->Text ;
:         Q_partner->ParamByName("a4")->AsString = p4->Text ;
:         Q_partner->ParamByName("a5")->AsString = p5->Text ;
:         Q_partner->ParamByName("a6")->AsString = p6->Text ;
:         Q_partner->ParamByName("a7")->AsString = p7->Text ;
:         Q_partner->ParamByName("a8")->AsString = p8->Text ;
:         Q_partner->ParamByName("a9")->AsString = p9->Text ;
:         Q_partner->ParamByName("a10")->AsString = p10->Text ;
:         Q_partner->ParamByName("a11")->AsString = p11->Text ;
:         Q_partner->ParamByName("a12")->AsInteger = StrToInt( p12->Text); <== 이부분이 의심스러워여..
:
:         __try{
:             try{
:                     Q_partner->ExecSQL();
:                 }
:
:             catch (Exception &E)
:                 {
:                     ShowMessage( E.Message);
:                 }
:         }
:
:         __finally{
:              partner_refresh();
:              }
:
: StrToInt()가 의심스러워서 별짓을 다 해봤는뎅...안되던데여..ㅡ.ㅡ
:
: 형에 관한 문젠거 같은데...아직 실력이 꽝이라서...ㅜ.ㅜ
: 아시는 분 답변 점.....
:
: 아..그리고 db프로그램 짤때여...형을 어떻게 선언해서 써먹어야 하는지 조언 점...
: 전 저게 안되서 검색이고 머고 무조건 string으로 다 넣어버릴려고 했거든여....ㅡ.ㅡ;;