Changeset 409 for ISPProgrammer

Timestamp:

Aug 14, 2012, 11:55:28 AM (12 years ago)

Author:

chronos

Message:

• Modified: Class TSerialPort in PinConnection package now use only numeric baud rate instead of static list of possible rates.

File:

• ISPProgrammer/Dallas/UDallasProgrammer.pas (modified) (3 diffs)

ISPProgrammer/Dallas/UDallasProgrammer.pas

@@ -41 +41 @@
     Timeout: TDateTime;
     Identification: string;
-    BaudRate: TBaudRate;
+    BaudRate: Integer;
     procedure LoadFromRegistry(Root: HKEY; Key: string); override;
     procedure SaveToRegistry(Root: HKEY; Key: string); override;
@@ -187 +187 @@
       RootKey := Root;
       OpenKey(Key + '\ISPProgrammer\Dallas', True);
-      BaudRate := TBaudRate(ReadIntegerWithDefault('FirmwareBaudRate', Integer(br57600)));
+      BaudRate := ReadIntegerWithDefault('FirmwareBaudRate', 57600);
     finally
       Free;
@@ -414 +414 @@
   Pin := TCommPin.Create;
   Pin.OnReceive := ReceiveData;
-  BaudRate := br9600;
+  BaudRate := 9600;
   SerialPortBackup := TCommSerialPort.Create;
 end;