# | Line 201 | Line 201 | end; | |
---|---|---|
201 | function CreateHexString(Data: TByteData; HexOnly: Boolean): String; | |
202 | var | |
203 | string_build, ascii_version: String; | |
204 | < | i: LongWord; |
204 | > | i: Integer; |
205 | begin | |
206 | string_build := ''; | |
207 | ascii_version := ''; | |
# | Line 234 | Line 234 | end; | |
234 | ||
235 | function DecodeHexString(hex: String): TByteData; | |
236 | var | |
237 | < | i: LongWord; |
237 | > | i: Integer; |
238 | begin | |
239 | SetLength(Result, Length(hex) div 2); | |
240 | for i := 0 to Length(Result) do |
– | Removed lines |
+ | Added lines |
< | Changed lines (old) |
> | Changed lines (new) |