헉.어디가 잘못된건지..

에러가셀수도없이 나오네여..쩝..

입력하면 바로 디비그리드로 출력이 되야하는데...



with main.Query1 do

begin

Close;

SQL.Clear;

SQL.Add('INSERT INTO "sampling_db.db"

VALUES (:일자, :Lot_num, :Device, :Sample.No, :Machine_Name,

:Chipsize, :검사수준, :측정항목)

');

ParamByName('일자').asdatetime:=strtodatetime(

FormatDateTime('YYYY-MM-DD',now));

ParamByName('Lot_num').asstring:=lotno.Text;

Parambyname('Device').asstring:=devicesel.text;

Parambyname('Sample.No').asinteger:=strtoint(lotse.Text);

Parambyname('Machine_Name').asstring:=machine_name.Text;

Parambyname('Chipsize').asfloat:=strtofloat(chips.Text);

Parambyname('검사수준').asinteger:=strtoint(interval.Text);

// Parambyname('측정항목').asinteger:=strtoint(interval.Text);

ExecSQL;

Open;

end;