FIREDAC - EmptyDataSet;

**voxben** · 26/08/2023, 16h00

Bonjour,
sur un petit programme de test, j'essaye d'effacer tout les enregistrements d'une table avec

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
FDTable1.EmptyDataSet;

je n'obtient aucune reaction du programme, ni aucun message
je ne comprend pas pourquoi !
un peu d'aide serait la bienvenue

Merci.

**SergioMaster** · 27/08/2023, 08h42

Bonjour,

Cela manque un peu d'informations. Cette table est une table d'une base de données (laquelle) ?
Dans quel contexte (mémoire cache ou pas) ?

**ALWEBER** · 27/08/2023, 10h00

Envoyé par voxben

Bonjour,
sur un petit programme de test, j'essaye d'effacer tout les enregistrements d'une table avec

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
FDTable1.EmptyDataSet;

je n'obtient aucune reaction du programme, ni aucun message
je ne comprend pas pourquoi !
un peu d'aide serait la bienvenue
Merci.

Par requête SQL

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

FDTable1.ExecSQL('DELETE FROM matable');

**voxben** · 27/08/2023, 11h35

Envoyé par SergioMaster

Bonjour,

Cela manque un peu d'informations. Cette table est une table d'une base de données (laquelle) ?
Dans quel contexte (mémoire cache ou pas) ?

Base de données sqlite.
Cache table sur false.

**voxben** · 27/08/2023, 11h37

Envoyé par ALWEBER

Par requête SQL

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

FDTable1.ExecSQL('DELETE FROM matable');

Avec SQL sur un query ou directement sur la connexion ça marche tres bien.
C l'usage du emptydataset que je ne comprends pas

**ALWEBER** · 27/08/2023, 12h03

Envoyé par voxben

Avec SQL sur un query ou directement sur la connexion ça marche tres bien.
C l'usage du emptydataset que je ne comprends pas

Le dataSet est alimenté par la requête. Donc c'est la source qu'il faut vider. Le "Empty" est plutôt destiné aux Tables Mémoires en vidant le contenu de la propriété 'Content'

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
 
  object Table1: TFDMemTable
    Active = True
    FetchOptions.AssignedValues = [evMode]
    FetchOptions.Mode = fmAll
    ResourceOptions.AssignedValues = [rvPersistent, rvSilentMode]
    ResourceOptions.Persistent = True
    ResourceOptions.SilentMode = True
    UpdateOptions.AssignedValues = [uvCheckRequired, uvAutoCommitUpdates]
    UpdateOptions.CheckRequired = False
    UpdateOptions.AutoCommitUpdates = True
    Left = 48
    Top = 120
    Content = {
      414442530F00000081030000FF00010001FF02FF0304000C0000005400610062
      006C006500310005000C0000005400610062006C006500310006000000000007
      0000080032000000090000FF0AFF0B0400120000006E0075006D0063006C0069
      0065006E007...

**voxben** · 27/08/2023, 12h16

Envoyé par ALWEBER

Le dataSet est alimenté par la requête. Donc c'est la source qu'il faut vider. Le "Empty" est plutôt destiné aux Tables Mémoires en vidant le contenu de la propriété 'Content'

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
 
  object Table1: TFDMemTable
    Active = True
    FetchOptions.AssignedValues = [evMode]
    FetchOptions.Mode = fmAll
    ResourceOptions.AssignedValues = [rvPersistent, rvSilentMode]
    ResourceOptions.Persistent = True
    ResourceOptions.SilentMode = True
    UpdateOptions.AssignedValues = [uvCheckRequired, uvAutoCommitUpdates]
    UpdateOptions.CheckRequired = False
    UpdateOptions.AutoCommitUpdates = True
    Left = 48
    Top = 120
    Content = {
      414442530F00000081030000FF00010001FF02FF0304000C0000005400610062
      006C006500310005000C0000005400610062006C006500310006000000000007
      0000080032000000090000FF0AFF0B0400120000006E0075006D0063006C0069
      0065006E007...

Dans ce cas, puisque emptydataset n'agit que sur TFDmemTable,
Pourquoi est elle accessible par TFDTable ?

**Papy214** · 27/08/2023, 18h19

Supprime tous les enregistrements du stockage de données interne de l'ensemble de données.

Appelez EmptyDataSet pour vider l'ensemble de données en supprimant tous les enregistrements du stockage de données interne et du journal des modifications.

Est-ce que le composant table est bien ouvert avant d'appeler cette fonction ??

**voxben** · 27/08/2023, 19h09

Envoyé par Papy214

Est-ce que le composant table est bien ouvert avant d'appeler cette fonction ??

oui le FDTable est ouvert - si FDTable est fermé une erreur s'affiche

**Papy214** · 27/08/2023, 21h13

Sinon ...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
 
  TFDTableHelper = class helper for TFDTable
    procedure EmptyDataset;
  end;
 
...
 
{ TFDTableHelper }
 
procedure TFDTableHelper.EmptyDataset;
begin
  ExecSQL(Format('DELETE FROM %s', [TableName]));
end;

**voxben** · 27/08/2023, 22h28

Envoyé par Papy214

Sinon ...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
 
  TFDTableHelper = class helper for TFDTable
    procedure EmptyDataset;
  end;
 
...
 
{ TFDTableHelper }
 
procedure TFDTableHelper.EmptyDataset;
begin
  ExecSQL(Format('DELETE FROM %s', [TableName]));
end;

Avec SQL sur un query ou directement sur la connexion ça marche tres bien.
C l'usage du emptydataset que je ne comprends pas

**Papy214** · 27/08/2023, 22h57

J'ai testé emptydataset et je n'e comprends pas non plus. Tout ce que je sais c'est que je suis content d'être tombé sur ce sujet, ça va m'éviter bien des problèmes très prochainement.

**ShaiLeTroll** · 29/08/2023, 10h15

EmptyDataSet() est pourtant parfaitement décrit dans la documentation

Supprime tous les enregistrements du stockage de données interne de l'ensemble de données.
Appelez EmptyDataSet pour vider l'ensemble de données en supprimant tous les enregistrements du stockage de données interne et du journal des modifications.

Cela vide uniquement ce qu'il y a en mémoire et c'est tout simplement pour reproduire le TClientDataSet qui fournit aussi une méthode EmptyDataSet souvent utilisé dans un contexte de cache avec commit via le journal, une fois les données poussées, elles n'ont plus raison d'exister, le tampon est appliqué (propriété Delta)

Donc c'est une méthode à utiliser uniquement si l'on utilise le TFDDataSet comme un TClientDataSet (FieldDefs.Ad, CreateDataSet ...)

**voxben** · 01/09/2023, 15h29

Envoyé par ShaiLeTroll

EmptyDataSet() est pourtant parfaitement décrit dans la documentation

Cela vide uniquement ce qu'il y a en mémoire et c'est tout simplement pour reproduire le TClientDataSet qui fournit aussi une méthode EmptyDataSet souvent utilisé dans un contexte de cache avec commit via le journal, une fois les données poussées, elles n'ont plus raison d'exister, le tampon est appliqué (propriété Delta)

Donc c'est une méthode à utiliser uniquement si l'on utilise le TFDDataSet comme un TClientDataSet (FieldDefs.Ad, CreateDataSet ...)

Merci,
j'ai bien saisie le truc en jouant sur le CachedUpdates le fonctionnement devient "visible".
comme une method EmptyTable existe pour TTable, je me suis borné a chercher un equivalent pour TDFTable, qui apriori n'existe pas.
la seule solution efficace pour vider un TFDTable est donc de passer par le SQL.

**ShaiLeTroll** · 01/09/2023, 15h55

C'est le problème de l'existance du TFDTable, à quoi peut bien servir ce composant, tout peut être fait avec un TFDQuery, c'est même plus "prudent" pour maitriser ce qui est chargé et ce qui est écrit en base.

le TTable c'était idéal pour Paradox et DBase, voire Access, le driver était adapté pour la lecture de ce genre de base de données qui n'était que de simple fichier séquentiel indexé.

Avec une base de donnée distante, il faut repenser la lecture, éviter au maximum un SELECT * FROM ... sans WHERE, c'est contre-performant.

**voxben** · 03/09/2023, 23h29

Envoyé par ShaiLeTroll

C'est le problème de l'existance du TFDTable, à quoi peut bien servir ce composant, tout peut être fait avec un TFDQuery, c'est même plus "prudent" pour maitriser ce qui est chargé et ce qui est écrit en base.

le TTable c'était idéal pour Paradox et DBase, voire Access, le driver était adapté pour la lecture de ce genre de base de données qui n'était que de simple fichier séquentiel indexé.

Avec une base de donnée distante, il faut repenser la lecture, éviter au maximum un SELECT * FROM ... sans WHERE, c'est contre-performant.

plus j'avance dans l'etude des bases de données avec delphi plus je me rend compte que ce qui peut etre ecrit directement en SQL doit etre fait en SQL.

**SergioMaster** · 04/09/2023, 08h38

Voilà un très bon adage. Donc exit FDTable bonjour FDQuery et FDUpdateSQL ?
Bon enfin ce n'est pas toujours vrai, les FDmemtable, la possibilité de cachedata , les possibilités d'injection dans le SQL sont des paramètres (et j'en oublie) à prendre en compte

**voxben** · 05/09/2023, 10h35

Envoyé par SergioMaster

Voilà un très bon adage. Donc exit FDTable bonjour FDQuery et FDUpdateSQL ?
Bon enfin ce n'est pas toujours vrai, les FDmemtable, la possibilité de cachedata , les possibilités d'injection dans le SQL sont des paramètres (et j'en oublie) à prendre en compte

FDMemTable et cachedata, je vois à peut pres leurs utilités par contre je ne vois pas comment FDTable pourrait protégé contre l'injection SQL.

**SergioMaster** · 05/09/2023, 11h30

Je parlais des FDQuery si l'on applique l'adage "ce qui peut être écrit directement en SQL doit être fait en SQL."

FIREDAC - EmptyDataSet;

Bases de données Delphi

Discussions similaires

Partager

Partager