Bonjour, bonsoir
Je vais peut-être passé pour un boulet, mais voilà.
J'ai besoin de detruire certaine form qui ont été créer dynamiquement.
Donc je parcours les form de cette façon
Cette ligne ne fonctionne pas
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8 // On detruit les fenêtres Midi qui ouvrait cette table For i:= Self.ComponentCount - 1 downto 0 do begin if(Self.Components[i] is TForm) And (Self.Components[i].Name <> Self.Name) And (StrPos(PChar(Self.Components[i].Caption),Pchar(TableASupprimer)) <> nil) then Components[i].Destroy; end;
(StrPos(PChar(Self.Components[i].Caption),Pchar(TableASupprimer)) <> nil)
car Self.Components[i].Caption n'ai pas accessible !!!
Comment faire quand on ne connait pas le name de la form seulement son caption ?
Merci.
Partager