Bonjour à tous,


Petite question pas bloquante en soi mais m'intéressant pour la culture générale

J'ai l'habitude de faire des truc comme ça :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
 
  with TIBSQL.Create(self) do
  begin
    database := dm.db;
    ...
    ... 
  free;
  end;
Mais est il possible de récupérer l'objet lui même créé sur la ligne With pour par exemple s'en servir comme paramètre dans un appel de fonction, par exemple :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
  with TIBSQL.Create(self) do
  begin
    database := dm.db;
    FonctionQuiVaBien(Mon_Objet_IBSQL_Ici)
    ...
    ... 
  free;
  end;
Merci d'avance de vos lumières.

Emmanuel.

PS : Dur dur de faire une recherche sur le mot clef with dans le forum !