is not a valid GUID value. Как исправить?

@kornju · Регистрация: 12.10.2020

Author24 — интернет-сервис помощи студентам

Продолжаю попытки программно связаться по Bluetooth (воспроизвести ролик Esp32 Delphi Bluetooth...)

Не работает кнопка Connect.

Delphi

const UUID = '(35443045-4535-3237-4639-4644ffffffff)';
 
function TForm1.ConectarDispositivo(pDeviceName: String): boolean;
var
lDevice: TBluetoothDevice;
begin
  for lDevice in Bluetooth1.PairedDevices do
  begin
  if lDevice.DeviceName = pDeviceName then
  FSocket := lDevice.CreateClientSocket(StringToGUID(UUID),True);
   if FSocket <> nil  then
    begin
   FSocket.Connect;
   Result := FSocket.Connected;
   end;
  end;
 
end;

А что не так?

@krapotkin · 25.11.2021, 11:14

guid обычно либо {} либо вообще без скобочек

@kornju · 25.11.2021, 11:57 **[ТС]**

Да! Действительно, нужны фигурные скобки. Спасибо!

@krapotkin 5839 / 4571 / 1442 Регистрация: 14.04.2014 Сообщений: 20,305 Записей в блоге: 20
	25.11.2021, 11:14	2
	Сообщение было отмечено kornju как решение Решение guid обычно либо {} либо вообще без скобочек 0

@kornju 0 / 0 / 0 Регистрация: 12.10.2020 Сообщений: 8
	25.11.2021, 11:57 [ТС]	3
	Да! Действительно, нужны фигурные скобки. Спасибо! 0

is not a valid GUID value. Как исправить?

Решение