델초보 wrote:

> 예를 들어 cd-rom에 시디가 들어있는데

> 거기에 있는 여러가지 파일들이 있는데

> 파일이름을 읽어서 Table에 입력시킬려고 하는데

> 폴더가 없고 파일 이름을 어떻게해서 모두 다 가져올수 있는데

> 모두 다 가져와서 Table에 입력해야 하는지..



FileListBox를 함 이용해 보세요

일단 읽고자 하는 드라이브에 FileListBox.Drive를 맞추고 작업하시면 될겁니다.

테스트를 안했는데 잘 모르시면 연락주세요..

그럼 즐프하세요..

procedure TForm1.Button1Click(Sender: TObject);

var i : Integer;

begin

with Query1 do

begin

close;

Sql.clear;

SQL.ADD('Insert into Tabel');

SQL.ADD('( a ) Value');

SQL.ADD('(:a ) ');



for i := 0 to FileListBox1.count-1 do

begin

ParamByName('a').AsString := FilelistBox1.Items[i];

ExecSQL;

end;

end;

end;