한대필 wrote:

> 어와! 미쳐버리겠습니다.

> 하루 왠종일 이걸로 골머리를 썩히고 있습니다.

> 제가 워낙 초짜라..

> . . . .

> 폼이 없는 UNIT에서요..

> Ttable 을 동적으로 생성해서 써야 합니다.

>

> 도저히 되지를 않는 군요.. 어쩌면 좋지요?

>

> 알려 주세요...





알고나면 너무 쉬운건데...

제가 실제 사용한 코드입니다.

더 자세한 것은 BDE폴더에 있는

LocalSQL.HLP파일을 열어

"create table"로 검색하시면

2차인덱스 생성이라든지, 여러가지 팁이 나오니

참고하세요.





with DM.Query do begin

if not FileExists('PreHis.DB') then begin

SQL.Clear;

SQL.Add('CREATE TABLE PreHis (');

SQL.Add('MsgNo CHAR(25),');

SQL.Add('DateTime TIMESTAMP,');

SQL.Add('PatName CHAR(20),');

SQL.Add('PatTel CHAR(14),');

SQL.Add('PRIMARY KEY (MsgNo))');

ExecSQL;

end;

end;

한대필 wrote:

> 어와! 미쳐버리겠습니다.

> 하루 왠종일 이걸로 골머리를 썩히고 있습니다.

> 제가 워낙 초짜라..

> . . . .

> 폼이 없는 UNIT에서요..

> Ttable 을 동적으로 생성해서 써야 합니다.

>

> 도저히 되지를 않는 군요.. 어쩌면 좋지요?

>

> 알려 주세요...



uses 절에 필요한 unit(DB관련)을 추가하시구..



var

Table1 : TTable;

begin

Table1 : TTable.Create(self);

Table1.Alias := '알리아스명';

Table1.TableName := '테이블명';



Table1.Open;

end;



일케하믄 안되나여?