--- C:/Users/DMXXXX/AppData/Local/Temp/avr_common.pas-revBASE.svn000.tmp.pas Fr Sep 21 17:32:43 2018 +++ C:/laz_comp_svn/AVR/AVR_Package/avr_common.pas Sa Sep 22 12:07:35 2018 @@ -13,0 +14 @@ function GetSerialPortNames: string; +function AVRSerialBaudRates: string; @@ -23,0 +25,10 @@ uses +function AVRSerialBaudRates: string; +var + v: TStringList; +begin + v := TStringList.Create; + v.AddStrings(['300','600','1200','2400','4800','9600','14400','19200','28800','31250','38400','57600','115200']); + Result := v.CommaText; + v.Free; +end; +