제목 그대로 입니다.

var

MyList: TStringList;

I : Integer;

Tmp : String;

begin

Tmp := Edit1.Text;

MyList := TStringList.Create;

try

with MyList do

begin

Add('SERVER NAME='+Tmp);

Add('USER NAME=sa');

Add('OPEN MODE=READ/WRITE');

Add('SCHEMA CACHE SIZE=8');

Add('BLOB EDIT LOGGING=');

Add('LANGDRIVER=korea');

Add('SQLQRYMODE=');

Add('SQLPASSTHRU MODE=SHARED AUTOCOMMIT');

Add('DATE MODE=0');

Add('SCHEMA CACHE TIME=-1');

Add('MAX QUERY TIME=300');

Add('MAX ROWS=-1');

Add('BATCH COUNT=200');

Add('ENABLE SCHEMA CACHE=FALSE');

Add('SCHEMA CACHE DIR=');

Add('HOST NAME=');

Add('APPLICATION NAME=');

Add('NATIONAL LANG NAME=');

Add('ENABLE BCD=FALSE');

Add('TDS PACKET SIZE=4096');

Add('BLOBS TO CACHE=64');

Add('BLOB SIZE=4096');

Add('PASSWORD=');

end;



Session1.AddAlias('Fare_Ntserver', 'MSSQL', MyList);

finally

MyList.Free;

end;





이런식으로 bde를 생성합니다.

근데 컴터를 끄고 나면 그 bde에 제가 맞쳐 놓은것이 없어집니다.

무지 급한터 좀 도와 주세요