Export de donnée d'un dataset dans un fichier texte

Soyez le premier à donner votre avis sur cette source.

Vue 9 879 fois - Téléchargée 1 936 fois

Description

Objet d'export de donnée d'un Dataset (query ou table) dans un fichier texte.
C'est un premier jet et pour l'instant je n'ai fait que l'export (je ferai l'import plus tard) et je n'exporte pas pour l'instant les Blob et Memo (cela va venir).
Pour l'utiliser il suffit de créer une instance de TExportDataSet de renseigner les propriétés Dataset (le dataset soit être actif), FileName(nom et chemin du fichier texte de sortie) et Separateur(caractère se trouvant entre le champs exporté), puis il suffit de lancer ExportData.

Source / Exemple :


Tous dans le ZIP

Codes Sources

A voir également

Ajouter un commentaire

Commentaire

cs_Amadeus
Messages postés
129
Date d'inscription
mercredi 2 janvier 2002
Statut
Membre
Dernière intervention
15 mars 2004
2 -
Voici un exemple pour mcgyver :
procedure TForm1.Button1Click(Sender: TObject);
var
ExportDataSet: TExportDataSet;
begin
Table1.Active:= true;
ExportDataSet:= TExportDataSet.Create;
try
ExportDataSet.Dataset:= Table1;
ExportDataSet.FileName:= 'c:Table.txt';
ExportDataSet.Separateur:= ';';
ExportDataSet.ExportData;
finally
ExportDataSet.free;
end;
end;

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.