권만섭 wrote:

>

> 파라독스 DB 를 사용하느데요

> SQL로 Table 조회 후 화면에 표시하여 수정하여 저장하는데

> 조회한 내용이 다른 레코드에 저장이 되는데요

> 레코드 포인터를 찾지 못하는것 같은데요

> 방법 좀 알려주세요

>

> 삭제하는 것도 마찬가지 입니다..



권만섭님 안녕하세요?

어떻게 수정, 삭제하셨는지 코드를 올려주시거나,

에러 문장을 함께 올려주시면 답변하기에 많은 도움이 됩니다.

한번 소스를 보는것이 많은 이야기들을 듣는 것 보다 낫기 때문이죠.

아래 내용은 쿼리로 입력, 수정, 삭제 하는 예를 들었구요,

쿼리를 사용하시지 않고 수정삭제하고 싶으시다면

UpdateSQL도 사용해보세요.

아래 내용 보시고 응용하셔서 도움되시기 바랍니다.



INSERT문 : insert into [테이블명]

(필드목록1, 필드목록2, 필드목록3, ...)

values (필드값목록1, 필드값목록2, 필드값목록3, ...)

: 데이터베이스에 레코드를 추가한다.







With Query do begin

close; //종료

clear; //기존내용 삭제

sql.add(' insert into dept '); //명령 입력

sql.add(' (field1, field2, field3, field4) ');

sql.add(' values (:field1, :field2, :field3, :field4) ');

ParambyName('field1').Asstring := edit1.text; //문자형

ParambyName('field2').Asnumber := strtoint(edit2.text); //숫자형

ParambyName('field3').Asdate := date; //날짜형(시스템 날짜)

ParambyName('field4').Asstring := copy(edit4.text,1,10); //문자형 일부분만

execsql; //실행

end;





UPDATE문 : update [테이블명]

set 필드목록2 = 필드값목록2,

필드목록3 = 필드값목록3,

...

where 필드목록1 = 필드값목록1

: 데이터베이스에 레코드를 수정한다.







With Query do begin

close; //종료

clear; //기존내용 삭제

sql.add(' insert dept '); //명령 입력

sql.add(' field2 = :field2, ');

sql.add(' field3 = :field3, ');

sql.add(' field4 = :field4 ');

sql.add(' where field1 = :field1 ');

ParambyName('field1').Asstring := edit1.text; //문자형

ParambyName('field2').Asnumber := strtoint(edit2.text); //숫자형

ParambyName('field3').Asdate := date; //날짜형(시스템 날짜)

ParambyName('field4').Asstring := copy(edit4.text,1,10); //문자형 일부분만

execsql; //실행

end;





DELETE문 : delete from [테이블명]

where 필드목록1 = 필드값목록1

: 데이터베이스에 레코드를 삭제한다.







With Query do begin

close; //종료

clear; //기존내용 삭제

sql.add(' delete from dept '); //명령 입력

sql.add(' where field1 = :field1 ');

ParambyName('field1').Asstring := edit1.text; //문자형

execsql; //실행

end;