Forum: Win32/Win64 API (native code)
by Deep-Sea,
9. Feb 2011
Das ist doch schön. :-D
Ich weiß nicht, obs bei Windows das gleiche ist, aber bei einem anderen System (Hardware), ist der Timeout (bzw. die Inquiry-Time) in Schritten von 1,28 Sekunden unterteilt. Außerdem meine ich mal aufgeschnappt zu haben, dass es bis zu 8 Sekunden dauern kann, bevor ein BT-Gerät gefunden wird, bedingt durch verschiedenste Latenzzeiten, etc.
Forum: Win32/Win64 API (native code)
by Deep-Sea,
7. Feb 2011
Und das dort nicht explizit nach Radios gesucht wird :wink:
Forum: Win32/Win64 API (native code)
by Deep-Sea,
7. Feb 2011
Ich habe in einem Testprogramm folgendes gefunden:
procedure TForm1.Button2Click(Sender: TObject);
var
hDeviceFind:THANDLE;
deviceInfo:BLUETOOTH_DEVICE_INFO;
deviceSearchParams:BLUETOOTH_DEVICE_SEARCH_PARAMS;
begin
deviceInfo.dwSize := SizeOf(deviceInfo);
With deviceSearchParams do
begin
Forum: Win32/Win64 API (native code)
by Deep-Sea,
7. Feb 2011
until (BluetoothFindNextRadio(hFind, hRadio)) or (x > 0); Du brichst die Schleife ab, wenn du ein weiteres Radio findest (oder wenn x größer 0 ist) aber machst weiter, wenn du KEINS findest? Sicher, dass du das so wolltest?
Nutze doch auch für die Devices eine repeat-Schleife, dann musst du den kompletten Block mit dem Hinzufügen zum Memo nicht zwei mal schreiben: DRY.
Vlt. solltest du bei...