cards.dll

Question

J'ai fait en Delphi un programme de tirage de cartes (Publié dans CS) et comme je suis en train de m'initier sérieusement à VB.Net j'ai essayé de le transposer.
J'ai donc déclaré cards.Dll dans un module
    Public Declare Function cdtInit Lib "Cards.dll" (ByRef cWidth As Integer, ByRef cHeight As Integer) As Integer
    Public Declare Function cdtDrawExt Lib "Cards.dll" (ByVal hdc As IntPtr, ByVal X As Integer, ByVal Y As Integer, ByVal dx As Integer, ByVal dy As Integer, ByVal ordCard As Integer, ByVal iDraw As Integer, ByVal clr As Integer) As Integer
    
    Public Const cdt_FACE As Short = &H0s 'Affiche une carte face visible.
    Public Const cdt_BACK As Short = &H1s 'Affiche une carte face retournée.
    Public Const cdt_INVERT As Short = &H2s ' Affiche une carte face visible en mode sélection.

Aucun message d'erreur, donc tout va bien !

Lorsque j'appelle les fonctions aucun message mais aucun affichage non plus. en pas à pas les différentes variables sont bien initialisées.
            cdtDrawExt(Handle, X, Y, Largeur, hauteur, Carte, 0, 1)
Je pense que handle ne suffit peut-être pas.
En Delphi cdtDrawExt(Form1.Canvas.Handle,posX,posY,60,90,card,0,clWhite);
J'ai essayé Me. avec l'aide intuitive je n'ai rien trouvé de probant.
Merci à qui peut m'aider.

YMM

cs_casy · Answer

Tiens regarde cette discution, il y a justement un petit passage sur les handles qui pourrait bien t'interessé.

http://www.vbfrance.com/infomsg_PROBLEMES-AVEC-API-GRAPHIQUES-WINDOWS_951036.aspx#8

---- Sevyc64  (alias Casy) ----<hr size="2" width="100%" /># LE PARTAGE EST NOTRE FORCE #    (Nouveau --- Forum exclusivement MSOffice et VBA by Mortalino)

Cards.dll

1 réponse

Votre réponse

Discussions similaires