Delphi 蓝牙德尔福2007

我是Delphi新手，使用Delphi2007，我正在连接蓝牙打印机e并发送数据。 参考post和，我正在尝试在我的delphi项目中加载IdBluetooth.pas，并得到一些错误：

1） 无法识别ULONG、SYSTEMTIME和所有其他窗口类型

sin.port           := ULONG(-1);

2） 第107行未声明的标识符FReuseSocket和otUnix

if (FReuseSocket = rsTrue) or ((FReuseSocket = rsOSDependent) and (GOSType = otUnix)) then

TdIOHandlerSocket不包含memeber TdIOHandlerSocket（228和311）：

我添加了JWABluetoothA、JWABtHDef、JWABthSdpDef、jwawindellnames、JWAWindows、JWAws2Bth库

如何修复这些错误

---

另一个问题：除了连接，如果我应该向BT设备发送任何其他数据，我应该使用什么程序？

1-您可能应该在uses子句中添加

Windows

单元，以使这些类型可用，然后

2-您使用的是Delphi 2007，但您为《Indy Bluetooth Support》链接的文章日期是2011年年中。它很可能是为Indy的最新版本编写的，而不是Delphi2007附带的版本；您可能需要升级Indy版本或修改

Bluetooth.pas

的源代码才能将其降级为Indy版本

至于你的“另一个问题”，那将是另一个（单独的）问题，因为在你成功编译

Bluetooth.pas

之前，现在对它的回答将毫无意义

Socket.ReuseSocket := FReuseSocket;