남주희 wrote:

>

> table이 12개 있습니다.

>

> 이때 편집버튼을 1줄에서 해결하려고 합니다.

> 즉 "추가"버튼을 누르면 상황에따라서 다른 table에 append,post등의

> 명령을 실행하고자 합니다.

>

> 현재

> Procedure form.buttonClick(Sender: TObject);

> begin

> table1.append; // 바로 이부분입니다.

> end;

>

> 제 의도는 변수 table_vb 에 상황에 따라 table명을 저장하고

> table_vb := 'table1';

> 위의 문구를 --> table_vb.append 할 수 없을까? 하는 겁니다.

>

> 이것 말고도 상황에 따라 table 명칭만 바뀌는 경우가 무지 많습니다.

> 만약 이것이 않된다면, 무려 똑같은 코딩을 x 12 하게 됩니다.

>

> 도와 주시는 분에게 조그만 사례를.....(메일로^^;)

first you need dummy datasource and let's call it

table_vb : TDataSource;



Procedure form.buttonClick(Sender: TObject);

begin

table_vb.DataSet := table7; // assign one of table name that you needed

table_vb.DataSet.Append;

end;