안녕하세요. 델 초보자 인데요....
그러니까 제가 알고 싶은 것은 query를 이용하여 그리드에 삽입하는 법을 알고싶습니다.
procedure Tinsert_f.insert_bClick(Sender: TObject);
begin
with main_f do
begin
query1.SQL.Add('insert into book');
query1.SQL.Add('(head,publish,author,page,date,price)');
query1.SQL.Add('value');
query1.SQL.Add('(:head1,');
query1.SQL.Add(':publish1,');
query1.SQL.Add(':author1,');
query1.SQL.Add(':page1,');
query1.SQL.Add(':date1,');
query1.SQL.Add(':price1)');
Query1.ParamByName('head1') .asstring := edit2.Text ;
Query1.ParamByName('publish1').asstring := edit3.Text ;
Query1.ParamByName('author1') .asstring := edit4.Text ;
Query1.ParamByName('page1') .asstring := edit6.Text ;
Query1.ParamByName('date1') .asstring := edit7.Text ;
Query1.ParamByName('price1') .asstring := edit8.Text ;
end;
main_f.query1.ExecSQL ;
main_f.display; //여기에는 close,clear,add,open문이 들어있슴.
end;
이게 제가 작성한건데요. 계속 에러가 납니다. 수정좀 부탁드릴께요.
그리고 좋은 방법있으시면 좀 적어주시면 고맙겠네요.
즐거운 하루 되세요
query1.SQL.Add('value'); 문장에서 vlaue 가 아니라 values 가 되어야 합니다.
즉
query1.SQL.Add('values');
이어야 하지요.
---
수미지 wrote:
> 안녕하세요. 델 초보자 인데요....
> 그러니까 제가 알고 싶은 것은 query를 이용하여 그리드에 삽입하는 법을 알고싶습니다.
>
> procedure Tinsert_f.insert_bClick(Sender: TObject);
> begin
> with main_f do
> begin
> query1.SQL.Add('insert into book');
> query1.SQL.Add('(head,publish,author,page,date,price)');
> query1.SQL.Add('value');
> query1.SQL.Add('(:head1,');
> query1.SQL.Add(':publish1,');
> query1.SQL.Add(':author1,');
> query1.SQL.Add(':page1,');
> query1.SQL.Add(':date1,');
> query1.SQL.Add(':price1)');
> Query1.ParamByName('head1') .asstring := edit2.Text ;
> Query1.ParamByName('publish1').asstring := edit3.Text ;
> Query1.ParamByName('author1') .asstring := edit4.Text ;
> Query1.ParamByName('page1') .asstring := edit6.Text ;
> Query1.ParamByName('date1') .asstring := edit7.Text ;
> Query1.ParamByName('price1') .asstring := edit8.Text ;
> end;
> main_f.query1.ExecSQL ;
> main_f.display; //여기에는 close,clear,add,open문이 들어있슴.
> end;
>
> 이게 제가 작성한건데요. 계속 에러가 납니다. 수정좀 부탁드릴께요.
> 그리고 좋은 방법있으시면 좀 적어주시면 고맙겠네요.
> 즐거운 하루 되세요