박찬희 wrote:

> 델파이에서 삽입문을 넣어보려하는데여..

>

> 에디트에 내용을 입력해서 버튼을 누르면..

>

> DBGrid로 삽입한 내용이 뿌려지도록 할려구 하는데여...

>

> 자꾸 에러가 뜨네여...

>

> UnKnown directive : 'Query1'

>

> could not compile used unit 'unit3.pas'

>

> 라구 말이졍...

>

>

> procedure TForm3.Button1Click(Sender: TObject);

> Query1.Insert;

> Query1.FieldName('No').value := Strtoint(Edit1.text);

> Query1.FieldName('Name').value := Edit2.text;

> Query1.FieldName('Birth').value := Edit3.text;

> Query1.FieldName('Depart').value := Edit4.text;

>

> Query1.Close;

> Query1.SQL.Clear;

> Query1.SQL.Add('Select 키번호, 번호, 이름, 생일, 소속');

> Query1.SQl.add('Order by 번호 ASC;');

> Query1.Open;

>

> Edit1.text := '';

> Edit2.text := '';

> Edit3.text := '';

> Edit4.text := '';

>

> Edit1.SetFocus;

> end;

>

> 라고 썼는데.. 델파이 3.0을 사용하구 있거든여..

>

> 어떻게 해야하는지 좀 가르켜주세여..

>

>

이렇게 입력해 보세여..



procedure TForm3.Button1Click(Sender: TObject);

with Query1 do

begin

Close;

SQL.Clear;

SQL.Add('INSERT INTO 테이블명 VALUES (:No, :Name, :Birth, :Depart)');

ParamByName('No').As(필드Type) := Edit1.Text;

ParamByName('Name').As(필드Type) := Edit2.Text;

.

.

.

ExecSQL;

Open;

end;

end;