Profil de thierrybo - CodeS SourceS

Libération des objets associés aux Items d'un TListView [Résolu]

Bonjour, J'ai plusieurs Form avec des TListView dont certains items ont des Objets associés. Comme pour les objets ajoutés aux Items d'un TListBox ou TComboBox, TListView ne les libère pas quand il est détruit. Donc dans le FormDestroy j'ajoute : FreeListViewObjects(ListView1.Items); et procedure FreeListViewObjects(const AL... Lire la suite

Bon j'ai trouvé, Il ne faut pas laisser Delphi fermer toutes les forms lui même mais le faire soi-même dans CloseQuery, et là plus de fuite ! : procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean); var i: integer; begin for I := 1 to -1 + Screen.FormCount do Screen.Forms[I].Close; end;

Question sur fonction assigned() [Résolu]

Bonjour à tous, Comment savoir si une fenêtre est créée / affichées, je m'explique: Quand je crée une fenêtre avec form1 := tform1.create(self) - self étant une fenêtre parent, je crée ma fenêtre bien si dans mon code je teste assigned(form1) , j'aurai True, bien. si dans l'évenement OnClose de Form1 il y a Action : = cafree... Lire la suite

Solilog nous disait le dimanche 12 juillet 2009 à 18:17:37 Bonjour, Je dois être pinailleur,désolé. Oui ça marche parce que tu forces Form2:= nil dans TForm2.FormClose ce que je veux éviter car "en théorie" c'est interdit de mettre un pointeur de classe à nil avant la fin des traitements (le close doit ensuite appeler free, destroy p...

FONCTION LONGPATHPARAMSTR

/source/33923-fonction-longpathparamstr

Bonjour, j'ai un problème lorsqu'un des paramètres est vide, cela arrive parfois. Même entre guillemet, Delphi conrtairement à VB (par exemple) l'ignore complètement comme s'il n'avait pas été envoyé => paramcount faux etc...

Paramétres d'un exécutable [Résolu]

Bonjour, Je dois faire une programme qui va récupérer les paramètres d'un exécutable(browser). Je sais qu'il faut utliliser ParamStr() mais sans plus . Si quelqu'un peut m'éclairer là dessus. merci.

Beckerich nous disait Donne nous un bout de code pour comprendre car j'utilise ParamCount et ParamStr(xy) pour récupérer les paramètres passées à l'exécutable. si paramcount = 3 alors paramstr(0) contient le nom complet de l'exécutable paramstr(1) contient le premier paramètre paramstr(2) contient le second paramètre exemple :...

DELPHI - CREATION D'UNE COLLECTION D'ENREGISTREMENTS SAGE (TCOLLECTION)

/source/48505-delphi-creation-d-une-collection-d-enregistrements-sage-tcollection

D'accord, et est-ce qu'il génère un format Sage ligne 100 ou un format paramétrable ?

Bonjour, je ne comprend pas vraiment ce que ça fait. Ça exporte convertit un fichier d'écritures comptable généré par la paie dans un autre format, ou c'est pour importer quelque chose dans la paie ?

Typage entre vb et Delphi

Bonjour, voila je suis débutant en Delphi, et je dois utiliser un objet com pour lesquels j'ai des exemples en VB que je souhaite convertie en Delphi. En VB j'ai ça : Dim ObjetClient As IBOClient3 ObjetClient = BaseCpta.FactoryClient.Create En VB le create me renvoie un objet IBIPersistObject qui n'est donc pas du type IBOCli... Lire la suite

Effectivement d'après la doc que j'ai, tous les objets créés dérivent de deux interfaces principales, IBIPersistObject ou IBITypeObjectFactory. IBOClient3 dérive de IBIPersistObject. Delphi est plus strict apparemment. Avec AS ça marche. Il faut juste que je comprenne la différence entre les deux méthodes. Merci.

CALCUL DU NOMBRE DE JOURS OUVRÉS ENTRE DEUX DATES

/source/28509-calcul-du-nombre-de-jours-ouvres-entre-deux-dates

Bonjour, je suis en train de tester ce script avec les jours fériés : 2008 jours fériés / jours ouvrés Janvier : 1 / 22 OK Février : 0 / 21 OK Mars : 1 / 20 OK Avril : 0 / 22 OK Mai : 4 / 18 NOK (sans compter le 12/5 !) Juin : 0 / 21 OK Juillet : 1 / 22 OK Aout : 1 / 21 OK Septembre : 0 / 22 OK Octobre : 0 / 23 OK Nov...