인터베이스에서 TDATABSE로 DB 열고 TQUERY로 쿼리를 날립니다.
WITH QUERY1 DO
BEGIN
Sql.Add(' INSERT INTO PIMS_COLOR(MATCOLOR,DESCRIPTION,MATCOLORSAMP)');
Sql.Add(' VALUES (:MATCOLOR,:DESCRIPTION,:MATCOLORSAMP)');
ParamByName('MATCOLOR').AsString := TE_Color.Text;
ParamByName('DESCRIPTION').AsString := TE_ColorDESC.Text;
ParamByName('MATCOLORSAMP').AsString := ColorToString(PL_Color.Color);
END;
인데.. :MATCOLOR 는 키라서 반드시 입력 받습니다.
하지만..DESCRIPTION 은 안넣어도 되는 필드기 때문에 NULL 값이 존재 가능하지만.
NULL이 입력되면..ZERO 값이 들어가면 안된다는 메세지가 뜨네요..ㅠ.ㅠ
거의 프로그램이 파라미터로 많이 짜져서..
''+ TE_COLOR.TEXT + '''' 뭐 이런식으로 짤 시간이 없어여..ㅠ.ㅠ
왜그런지..
다른 방법있으시면 감사하겠습니다..ㅠ.ㅠ