0

Delphi BDE Paradox * .dbクエリ結果をテキストファイルにエクスポートするにはどうすればよいですか？たとえば、BorlandDelphiでSQLExplorerまたはDatabaseDekstopを使用し、次のようなクエリを使用します。SELECT * FROM mst_employee;

そして、テキストファイルでクエリの結果をmst_employee.txtと言いたいのですが、次のようになります。

employee_code;name;status;
001;Andi;1;
002;Budi;2;
003;Carli;3;

前に感謝します

4

1 に答える 1

0

クエリによって返された結果セットを繰り返し処理し、結果をテキストファイルに書き込み、各ファイルをセミコロンで区切ります。私はこれを行う組み込み機能を知りません。

with query do
 begin
  params[0].asinteger:= <whatever>;
  open;
  if not isempty then
   begin
    assignfile (f, 'c:\data.txt');
    rewrite (f);
    while not eof do
     begin
      writeln (f, fieldbyname ('a').asstring, ';', fieldbyname ('b').asstring, ';');
      next
     end;
    closefile (f);
   end;
  close
 end;

古いスタイルのPascalI/ Oについてお詫びしますが、まだBDEを使用している場合は.....

于 2012-07-11T03:14:41.737 に答える