PureBasic

Pour windows seulement: Define Run = RunProgram("wmic", "printer get name", "", #PB_Program_Open | #PB_Program_Read | #PB_Program_Hide) If Run While ProgramRunning(Run) If AvailableProgramOutput(Run) Debug ReadProgramString(Run) EndIf Wend CloseProgram(Run) Else Debug &...

J'avais commencé un code pour toi mais je me suis aperçu qu'il est difficile de changer la couleur d'un checkbox. Pour cela il faut utiliser un code de ChriR ici https://github.com/ChrisRfr/ObjectTheme. Je mets quand même le peu de code que j'ai fait : Structure item t1.s t2.s t3.s t4.s t5.s t6.s t7...

Oui même problème, il n'y a rien à faire sinon insister et enregistrer le fichier en le changeant un peu.

M.

Exemple 1: Windows seulement et ça ne marche pas très bien. Exemple 2: Multiplateforme et marche bien, en utilisant un canvas. If OpenWindow(0, 0, 0, 200, 200, "ButtonGadgets", #PB_Window_SystemMenu | #PB_Window_ScreenCentered) ButtonGadget(1, 10, 10, 180, 20, "Standard Button",#...

Les variables ne sont pas détruites donc elles restent accessibles au debugger, mais seulement lui, pas le reste du programme. Heureusement car ça permet de réutiliser un module même après un UnuseModule comme ci-dessous. Tout fonctionne bien en fait. M. EnableExplicit DeclareModule TEST Structure S...

Il nous faut un peu de code exemple, 1 pour le module et 1 pour le source appelant.

M.

Avec changement d'icône à la volée avec un simple ou double clic. Runtime Enumeration Windows #win EndEnumeration Runtime Enumeration Gadgets #tree EndEnumeration Enumeration #Closed #Open #sheet EndEnumeration Declare tree_OnEvent() Declare tree_OnChange() Declare tree_OnLeftclic() Declare tree_OnL...

Parfois W11 fait des trucs bizarre de ce type.

J'ai testé mon code sur windows 10 64b avec pb6.10 x64 et x86 ainsi que sur windows xp 32b pb 6.03 x86 et tout fonctionne bien, les 4000 images sont affichées. As-tu Windows 11 ? [AJOUT] J'ai comme limite 30734 et la limite absolue est de 32767 qui est une limite de Windows. voir ici https://www.pur...

J'ai trouvé ça dans mes archives. ; Win OS - Workaround sample for removing the 32k size Limit on the ScrollAreaGadget - First testversion d19 m07 y2017 ; Author Werner Albus - www.nachtoptik.de - www.quick-aes-256.de #ImageHeight=200 ; Change you the height, you must change also the pre defined off...

Ça marche bien , c'est prometteur

M.

PureBasic 64b compile en pure 64 bits et gère fastcall. Sous Windows et Linux, PureBasic utilise fasm ( http://flatassembler.net), alors pour plus d'information à propos de la syntaxe, lire le guide fasm. Sous OS X, PureBasic utilise yasm ( http://yasm.tortall.net/), quant à OS X sous M1 et M2, je n...

A priori ce ne sont pas les handles qui sont en cause mais leur gestions par le programmeur, surtout dans la boucle principale.
Utiliser des constantes ou pas ne doit pas générer de problèmes en soi.

M.

If OpenWindow(0, 0, 0, 405, 240, "ScrollAreaGadget", #PB_Window_SystemMenu | #PB_Window_ScreenCentered) ScrollAreaGadget(0, 10, 10, 390,220, 575, 575, 30) x=10 y=10 For i=1 To 8 CreateImage(i, 32,32,32,#PB_Image_Transparent);transparence= 32 bits obligatoire StartDrawing(ImageOutput(i)) D...