Forum Liberty Basic France
• Index
Bonjour,
Je tente de contourner le problème de "réaffichage" d'une fenêtre graphique par l'API LockWindowUpdate.
Ca ne fonctionne pas...
Ci-dessous l'essentiel du code sur ce sujet.
Quelqu'un possède-t-il l'idée ?...
Merci,
Louis.
...
Open "user32" for DLL as #u
...
...
...
hndl=hwnd(#1)
CallDLL #u, "LockWindowUpdate", hndl As ulong
...
'INSTRUCTIONS D'AFFICHAGE SUR #1
...
hndl=0
CallDLL #u, "LockWindowUpdate", hndl As ulong
...
...
...
Je tente de contourner le problème de "réaffichage" d'une fenêtre graphique par l'API LockWindowUpdate.
Ca ne fonctionne pas...
Ci-dessous l'essentiel du code sur ce sujet.
Quelqu'un possède-t-il l'idée ?...
Merci,
Louis.
...
Open "user32" for DLL as #u
...
...
...
hndl=hwnd(#1)
CallDLL #u, "LockWindowUpdate", hndl As ulong
...
'INSTRUCTIONS D'AFFICHAGE SUR #1
...
hndl=0
CallDLL #u, "LockWindowUpdate", hndl As ulong
...
...
...
Salut
Il n'est pas nécessaire d'ouvrir user32 sous LB, la dll est automatiquement chargée sous le handler #user23
Normalement, les appel d'api sous LB attendent tous un paramètre de retour (à void dans ton cas)
Code VB :
Je n'ai pas testé ce programme, mais ça me parait déjà un peu mieux.
Si tu as du code exécutable tel quel, je veux bien tester chez moi pour voir si ça marche ou non
Il n'est pas nécessaire d'ouvrir user32 sous LB, la dll est automatiquement chargée sous le handler #user23
Normalement, les appel d'api sous LB attendent tous un paramètre de retour (à void dans ton cas)
Code VB :
Open "fenetre" for window as #1 hndl=hwnd(#1) CallDLL #user32, "LockWindowUpdate", hndl As ulong, r as void hndl = 0 CallDLL #user32, "LockWindowUpdate", hndl As ulong, r as void #1, "trapclose [quit]" wait [quit] close #1 end
Je n'ai pas testé ce programme, mais ça me parait déjà un peu mieux.
Si tu as du code exécutable tel quel, je veux bien tester chez moi pour voir si ça marche ou non

Bonjour,
Merci pour la très utile réponse... L'absence du "r as void" semblait être la cause du problème...
Il semblerait que l'instruction "background" souffre un peu de ce LockWindowUpdate, mais je vais la remplacer par une de ses copines :-)
Pour ce qui est de tester le projet... Euh... Le répertoire du projet fait 4.63 Go... Oui, j'ai dû un peu me lâcher... :-))
Merci encore !...
Merci pour la très utile réponse... L'absence du "r as void" semblait être la cause du problème...
Il semblerait que l'instruction "background" souffre un peu de ce LockWindowUpdate, mais je vais la remplacer par une de ses copines :-)
Pour ce qui est de tester le projet... Euh... Le répertoire du projet fait 4.63 Go... Oui, j'ai dû un peu me lâcher... :-))
Merci encore !...
• Index
1 Utilisateur en ligne : 0 Administrateur, 0 Modérateur, 0 Membre et 1 Visiteur
Utilisateur en ligne : Aucun membre connecté
Utilisateur en ligne : Aucun membre connecté
Répondre
Vous n'êtes pas autorisé à écrire dans cette catégorie