var

break1, reason, daech : string;

.

.

.



break1:=inputbox('발생현황', '발생현황을 입력하세요.','');

reason:=inputbox('원인', '원인이 뭔가요?','');

daech:=inputbox('대책', '대책은 있습니까?','');

if break1='' then

showmessage('입력된것이 아무것도없습니다')

else begin

table1.Append;

table1.FieldByName('일자').asdatetime:=strtodatetime(

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

table1.FieldByName('발생현황').asstring:=break1;

table1.FieldByName('원인').asstring:=reason;

table1.FieldByName('대책').asstring:=daech;

table1.Post;

end;



발생현황, 원인, 대책은 모두 메모필드입니다..

근데 디비에 저장이 안되여..

어디를 바꿔줘야하는지..