델초짜 wrote:

> 안녕하세요 저는 이제 막 델파이에 빠져들어가고 있는 사람입니다.

>

> 근데 몇가지 질문드릴께있어서 이렇게 글을 올립니다.

>

> 주소록을 하나 만드는데 SQL문장을 써서 할려고 합니다.

>

> 폼에는 QUERY1개 DATASOURCE 1개 DBGRID 한개를 배치했으며

>

> 버튼을 3개 배치했는데 각각 수정, 삭제,삽입 버튼입니다.

>

> 그런데 여기서 레코드하나를 삭제하고 또 수정하고 ,마지막으로

>

> 하나의 레코드를 삽입하는 문장을 어떻게 써야 할지 모르겠습니다.

>

> (*참고로제가 QUERY에 연결한 databasename는 db11이고 데이타베이스

>

> 이름은 addr.dbf입니다.)

>

> 또 제가 삽입버튼을 누르면 서브폼이 나와 거기에서 삽입할 내용을

>

> 쓸수 있게 만들려고 했는데 이건 방법이 없는지요...

>

> 부탁드리겠습니다.

>

>

> 끝까지 읽어 주셔서 감사합니다.

>

> 안녕히계세요 ^.^

>

>

>



안녕하세요. 저도 초짜입니다.

쿼리문을 모르셔서 질문을 올리신 것 같은데, 맞는지 모르겠군요.



1.삽입

with Query1 do begin

Close;

sql.Clear;

sql.Add('Insert Into "MyDb.dbf"');

sql.Add('values(');

sql.Add(':첫번째필드값,:두번째필드값');

ParamByName('첫번째필드값').AsString:= '첫번째값';

ParamByName('두번째필드값').AsString:= '두번째값';

execSQL;

end;



2.수정

with Query1 do begin

Close;

sql.Clear;

sql.Add('Update "MyDb.dbf"');

sql.Add('Set');

sql.Add('바꿀필드명=:바꿀필드값');

sql.Add('Where 조건=:조건');

ParamByName('바꿀필드값').AsString:= '바꿀값';

ParamByName('조건').AsString := '조건값';

execSQL;

end;



3.삭제

with Query1 do begin

Close;

sql.Clear;

sql.Add('Delete from "MyDb.dbf"');

sql.Add('Where 조건=:조건');

ParamByName('조건').AsString := '조건값';

execSQL;

end;



도움이 되셨으면 좋겠군요.