je sais que je me faire jeter par vous ( honte à moi )


je voudrais savoir
comment mettre faire pour une fenetre en couleur ainsi que les gadgets .
je recherche la methode la plus facile

bonne nuit
bien sur qu'il peut !!si PureBasic était capable de faire le café ?
Une idée ?
Code : Tout sélectionner
; doc pour io.dll
; function Descriptions
; Please refer To the prototype For the particular language you are using.
;
; PortOut
; Outputs a byte To the specified port.
;
; PortWordOut
; Outputs a word (16-bits) To the specified port.
;
; PortDWordOut
; Outputs a double word (32-bits) To the specified port.
;
; PortIn
; Reads a byte from the specified port.
;
; PortWordIn
; Reads a word (16-bits) from the specified port.
;
; PortDWordIn
; Reads a double word (32-bits) from the specified port.
;
; SetPortBit
; Sets the bit of the specified port.
;
; ClrPortBit
; Clears the bit of the specified port.
;
; NotPortBit
; Nots (inverts) the bit of the specified port.
;
; GetPortBit
; Returns the State of the specified bit.
;
; RightPortShift
; Shifts the specified port To the right. the LSB is returned, And the Value passed becomes the MSB.
;
; LeftPortShift
; Shifts the specified port To the left. the MSB is returned, And the Value passed becomes the LSB.
;
; IsDriverInstalled
; Returns non-zero If io.dll is installed And functioning. the primary purpose of this function is To ensure that the kernel mode driver For NT/2000/XP has been installed And is accessible.
PortNum.l = $378 ; LPT1 (port parallel )
LibOpen.l = OpenLibrary(1,"io.dll")
If LibOpen = 0
End
EndIf
CallFunction(1,"PortOut", PortNum,$80) ; write 80h to port 378h
Delay(1000)
End