PopupComponent


Sur le InitPopup tu dois initialiser le composant d'appel.



procedure TFrom1.PopInitPopup(Sender: TObject);
var
begin