with orqry1 do
begin
Close;
SQL.Clear;
SQL.Add('INSERT INTO TB_INSA_COM ('
+'PERSON_NO , '
+'COM_NAME , '
+'DAY , '
+'GRADE , '
+'DEF '
+') '
+'VALUES '
+'( '
+':PERSON_NO , '
+':COM_NAME , '
+':DAY , '
+':GRADE , '
+':DEF) ');
for i := 1 to advstrngrd1.ColCount -1 do
begin
for j := 1 to advstrngrd1.RowCount -1 do
begin
ParamByName('PERSON_NO').AsString := advstrngrd1.Cells[i,j];
ParamByName('COM_NAME').AsString := advstrngrd1.Cells[i,j];
ParamByName('DAY').AsString := advstrngrd1.Cells[i,j];
ParamByName('GRADE').AsString := advstrngrd1.Cells[i,j];
ParamByName('DEF').AsString := advstrngrd1.Cells[i,j];
ExecSQL;
end;
end;
end;
저장버튼을 누르면 EInternalError가 뜨네요...
초보라 어디서 문제인지 잘 모르겠네요..
|