Migration de FIBplus vers Firedac

Bonjour,
Je suis développeur en Delphi et je travaille actuellement sur la migration des composants FIBplus au composants Firedac. Cette migration est dû au passage du developpement sur Delphi XE2 à Delphi 10 seattle, et nous utilisons une base de données FireBird. Le problème que je rencontre actuellement est que je ne trouve les properties équivalantes aux properties "Allocations " et "PageSize" du composant "TpFIBDatabase" dans le composant TFDConnection. Pour faire court j'aimerai trouver l'équivalent du code suivant avec FireDac :

Code:

---

1 2 3 4 5 6

if (not FDatabase.Connected) then FDatabase.Open();   //Taille de la base en octets aAllocation := FDatabase.Allocation; aPageSize := FDatabase.PageSize;

---

Je pense qu'il faut faire FDConnection.Params.Add('PageSize=1024');
Par contre Allocation je ne vois pas ce que c'est.

Bonjour,

Citation:

---

Envoyé par Coudrak

Je pense qu'il faut faire FDConnection.Params.Add('PageSize=1024');

---

à priori il ne s'agit pas de mettre la taille de la page à 1024 mais de récupérer la taille de la page

Citation:

---

Envoyé par Coudrak

Par contre Allocation je ne vois pas ce que c'est.

---

le nombre de pages

je pense qu'il faut chercher dans les sources (plus exactement dans le Firedac.Phys.IBWrapper )

Code:

---

1 2 3 4 5 6 7

TIBDatabase = class(TIBObject) .. public .. property page_size: Integer index isc_info_page_size read GetDatabaseInfoInt; ... property allocation: Integer index isc_info_allocation read GetDatabaseInfoInt;

---

reste que je ne sais pas si l'on peut/comment convertir une FDConnection Firebird en TIBDatabase :koi:
mais au vu de l'objectif (si je l'ai bien compris) : Obtenir la taille de la base de données , si celle-ci n'est pas en plusieurs fichiers, ne serait-il pas plus simple d'obtenir la taille du fichier fdb ?

ou, mieux encore utiliser la requête suivante (que ce soit mono ou multi fichiers)

Code:

---

1 2 3 4

SELECT (a.MON$PAGE_SIZE * a.MON$PAGES) / 1024 -- en Ko FROM MON$DATABASE a

---