간단히 예제를 작성해 보았습니다.

특별한 것은 전혀없고 그냥 파라메터로 받은 테이블명을

SQL.Text := 'select * from '+ TableName;

이렇게 합하면 되는데요....





function TForm1.GetQuery(TableName: String): Boolean;

var Query: TQuery;

begin

try

try

Query := TQuery.Create(Self);

with Query do begin

Query.DatabaseName := 'DBDEMOS';

SQL.Text := 'select * from '+ TableName;

Open;

end;

result := True;

except

result := False;

end;

finally

Query.Free;

end;

end;



procedure TForm1.Button1Click(Sender: TObject);

begin

if GetQuery('events.db') then ShowMessage('테이블 오픈 성공')

else ShowMessage('테이블 오픈 실패');

end;





궁금이여요 wrote:

> 제발 좀 갈켜 주세요.... 플리즈

> TABLE을(TABLE명) FUNCTION에서 주고받아서

> TABLE명을 받은 곳의 TABLE에서 자료를 가져다가

> SELECT, INSERT등을 할 수 있나요??

> 있다믄 방법좀 갈켜 주세요...

>

정말 답변 진심으로 감사합니다.

하나만 더 물어볼께요

글럼 테이블 생성할때는 어떻게 해야되요....





강호규 wrote:

> 간단히 예제를 작성해 보았습니다.

> 특별한 것은 전혀없고 그냥 파라메터로 받은 테이블명을

> SQL.Text := 'select * from '+ TableName;

> 이렇게 합하면 되는데요....

>

>

> function TForm1.GetQuery(TableName: String): Boolean;

> var Query: TQuery;

> begin

> try

> try

> Query := TQuery.Create(Self);

> with Query do begin

> Query.DatabaseName := 'DBDEMOS';

> SQL.Text := 'select * from '+ TableName;

> Open;

> end;

> result := True;

> except

> result := False;

> end;

> finally

> Query.Free;

> end;

> end;

>

> procedure TForm1.Button1Click(Sender: TObject);

> begin

> if GetQuery('events.db') then ShowMessage('테이블 오픈 성공')

> else ShowMessage('테이블 오픈 실패');

> end;

>

>

> 궁금이여요 wrote:

> > 제발 좀 갈켜 주세요.... 플리즈

> > TABLE을(TABLE명) FUNCTION에서 주고받아서

> > TABLE명을 받은 곳의 TABLE에서 자료를 가져다가

> > SELECT, INSERT등을 할 수 있나요??

> > 있다믄 방법좀 갈켜 주세요...

> >