Changeset 326
- Timestamp:
- Jun 25, 2024, 3:22:12 PM (5 months ago)
- Location:
- trunk
- Files:
-
- 6 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/ItemList.pas
r317 r326 98 98 99 99 resourcestring 100 SUnsupportedDataType = 'Unsupported field value data type %s'; 100 SUnsupportedDataType = 'Unsupported field value data type %s'; 101 SUnsupportedValueIndex = 'Unsupported value index %d'; 101 102 102 103 … … 367 368 procedure TItem.GetValue(Index: Integer; out Value); 368 369 begin 369 raise Exception.Create( 'Unsupported value index ' + IntToStr(Index));370 raise Exception.Create(Format(SUnsupportedValueIndex, [Index])); 370 371 end; 371 372 … … 426 427 procedure TItem.SetValue(Index: Integer; var Value); 427 428 begin 428 raise Exception.Create( 'Unsupported value index ' + IntToStr(Index));429 raise Exception.Create(Format(SUnsupportedValueIndex, [Index])); 429 430 end; 430 431 -
trunk/Languages/xtactics.cs.po
r318 r326 378 378 msgstr "Nepodporovaný datový typ hodnoty pole %s" 379 379 380 #: itemlist.sunsupportedvalueindex 381 #, object-pascal-format 382 msgid "Unsupported value index %d" 383 msgstr "Nepodporovaný index hodnoty %d" 384 380 385 #: itemlist.syes 381 386 msgctxt "itemlist.syes" … … 1347 1352 msgid "View range" 1348 1353 msgstr "Dohled" 1349 -
trunk/Languages/xtactics.pot
r317 r326 360 360 msgstr "" 361 361 362 #: itemlist.sunsupportedvalueindex 363 #, object-pascal-format 364 msgid "Unsupported value index %d" 365 msgstr "" 366 362 367 #: itemlist.syes 363 368 msgctxt "itemlist.syes" -
trunk/Packages/PinConnection/CommFrame.pas
r317 r326 4 4 5 5 uses 6 Classes, Dialogs, SysUtils, SpecializedList, UBinarySerializer,6 Classes, Dialogs, SysUtils, SpecializedList, BinarySerializer, 7 7 CommPin; 8 8 … … 67 67 FreeAndNil(RawDataPin); 68 68 FreeAndNil(FrameDataPin); 69 ReceiveBuffer.Free;69 FreeAndNil(ReceiveBuffer); 70 70 inherited; 71 71 end; -
trunk/Packages/PinConnection/CommThread.pas
r317 r326 5 5 uses 6 6 Classes, SysUtils, CommPin, SyncObjs, Common, 7 DateUtils, Threading, SpecializedList, UBinarySerializer;7 DateUtils, Threading, SpecializedList, BinarySerializer; 8 8 9 9 type -
trunk/xtactics.lpi
r317 r326 56 56 <Debugging> 57 57 <GenerateDebugInfo Value="False"/> 58 <DebugInfoType Value="dsDwarf3"/> 58 59 <StripSymbols Value="True"/> 59 60 </Debugging>
Note:
See TracChangeset
for help on using the changeset viewer.