Discussion :

[zooffy]

Bonjour

J'ai un souci de transposition de code, vu que je parle pas un mot de C#

Est ce que vous pourriez m'aider à traduire ça :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
CooperativeLevelFlags(flag);
flag = Microsoft.DirectX.DirectInput.CooperativeLevelFlags.NonExclusive;
flag |= Microsoft.DirectX.DirectInput.CooperativeLevelFlags.Background;

Je vis pas à quoi ça correspond. Je pense qu'il y a un tableau, mais j'en suis pas sûr.

Merci

[calagan99]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
CooperativeLevelFlags(flag)
flag = Microsoft.DirectX.DirectInput.CooperativeLevelFlags.NonExclusive
flag = flag Or Microsoft.DirectX.DirectInput.CooperativeLevelFlags.Background

C# to VB

[zooffy]

Merci pour ton aide.
Je pense que j'ai besoins d'un coup de main de plus parce que ça marche pas.

J'ai essayé avec le site que tu donne en lien, mais lui aussi plante.
Le code complet c'est ça :

Code C# :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
private Device clavier;
private Key Up = Key.UpArrow;
private Key Down = Key.DownArrow;
private Key _Left = Key.LeftArrow;
private Key _Right = Key.RightArrow;
 
// Flags		
CooperativeLevelFlags flag;
flag = Microsoft.DirectX.DirectInput.CooperativeLevelFlags.NonExclusive;
flag |= Microsoft.DirectX.DirectInput.CooperativeLevelFlags.Background;	
 
clavier = new Device(SystemGuid.Keyboard);
clavier.SetCooperativeLevel(this, flag);
 
// On obtient l'accès au clavier
clavier.Acquire();

Mais une fois en VB il me raconte une histoire de type pour CooperativeLevelFlags et me dit que flag n'est pas déclaré. Mais j'ai pas bien compris où je devais le déclarer

Et le traductuer de code me dit qu'il y a

Conversion was attempted, however the following errors were reported:
-- line 1 col 16: Unexpected identifier

Et là, le chinois est plus clair pour moi.