Discussion :

[woow]

Bonjour,

Je tente en vain d'envoyer des données via une clé USB bluetooth et le composant tapdserialport sous Delphi3.

Problème : en essayant d'envoyer une commande à un autre module il est sensé me répondre. Je ne reçois rien.

2 possibilités : ou la clé n'emet pas ce que je demande ou je ne reçois rien en retour. (Je suppose que c'est la premier qui est juste car le module bluetooth distant fonctionne correctement)

Question : Y a t'il quelqu'un qui à déjà tenté d'effectuer un communication bluetooth avec Delphi ? Existe t'il un outil simple pour la communication seriel bluetooth (j'ai cherché dans les composants, mais je n'ai pas encore trouvé mon bonheur). Connaissez vous un sniffer efficace (pas pour pirater, juste pour regarder )

Voici le code que simple que j'essaye d'envoyer.

Code :

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

1
2
3
4
5
6
7
procedure TForm1.btnSearchClick(Sender: TObject);
var
packet : string;
begin
packet := char($FC) + char($01) + char($01) + char($07) + char($B8) + char($7A) + char($FD);
sendpacket(packet);
end;

Auparavant, le port est ouvert en mettant la propriété open à true et la vitesse de communication reglée à 38400.


Merci pour toute aide et suggestion

Pascal

[woow]

C'est curieux, chaque fois que je poste un message sur un forum, la réponse me vient très rapidement par une autre moyen.

Pour ceux que ca intéresse voici les détails.

Pour pouvoir communiquer en mode sériel avec un appareil bluetooth, il faut :
1. avoir tous les appareils connecter, ca va de soi je sais, mais c'est toujours utile de vérifier.
2. installer le stick USB bluetooth et rechercher le module bluetooth distant et le définir comme étant sur le port COMX (X étant un nombre non attribué)

3. Dans delphi, à l'aide d'un Tapdcomport de asyncpro, établir une connection.

Et voila.

Mon problème est tout autre maintenant car je peux envoyer des données mais le module distant ne répond pas...

Merci à tous ceux qui ont lu le message. Si je suis motivé, je vais écrire un tuto sur ce sujet.

[Bill14]

C'est curieux, chaque fois que je poste un message sur un forum, la réponse me vient très rapidement par une autre moyen

Salut,

C'est parce que tu as cherché, contrairement à certain qui attende que cela leur tombe dans le bec

[afriad]

tu peux poster ton code stp

[gbegreg]

tu peux poster ton code stp

Bonsoir,

Vous espérez sérieusement le code d'une discussion datant de 14 ans ? Surtout que maintenant, dans les versions actuelles de Delphi il y a des composants pour gérer le Bluetooth...