Forum: Win32/Win64 API (native code)
Delphi
by CTV,
17. Feb 2006
so ich bin nochma einen schritt weiter:
procedure TForm1.Button3Click(Sender: TObject);
var
hRadio,hDeviceFind:THANDLE;
hfind:HBLUETOOTH_RADIO_FIND;
btfrp:TBlueToothFindRadioParams;
radioInfo:BLUETOOTH_RADIO_INFO;
deviceInfo:BLUETOOTH_DEVICE_INFO;
deviceSearchParams:BLUETOOTH_DEVICE_SEARCH_PARAMS;
Forum: Win32/Win64 API (native code)
Delphi
by CTV,
8. Feb 2006
Danke dir Flocke
ich habe das Problem lösen können habe aber schon wider ein neus:
Lösung des alten Problems:
die Deklaration sieht nun so aus:
var
btfrp: _BLUETOOTH_FIND_RADIO_PARAMS = (
dwSize: SizeOf(TBlueToothFindRadioParams ));
Forum: Win32/Win64 API (native code)
Delphi
by CTV,
7. Feb 2006
nun bin ich einen Schritt weiter: mein code sieht nun so aus:
procedure TForm1.Button6Click(Sender: TObject);
var hRadio,hDeviceFind:THANDLE;
hfind:HBLUETOOTH_RADIO_FIND;
btfrp:PBlueToothFindRadioParams;
radioInfo:BLUETOOTH_RADIO_INFO;
deviceInfo:BLUETOOTH_DEVICE_INFO;
deviceSearchParams:BLUETOOTH_DEVICE_SEARCH_PARAMS;
begin
Forum: Win32/Win64 API (native code)
Delphi
by CTV,
25. Jan 2006
ich bin der Sache etwas näher gekommen in dem ich ein C programm umgeschrieben habe nun schauts so aus:
procedure TForm1.Button3Click(Sender: TObject);
var
//radio
FirstRadio:PBlueToothFindRadioParams;
RadioHandle:THANDLE ;
NextRadio:THANDLE;
FoundNextRadioHandle:BOOL;