# | Line 69 | Line 69 | end; | |
---|---|---|
69 | procedure TForm_Extractor.btn_exportClick(Sender: TObject); | |
70 | var | |
71 | begintime: Double; | |
72 | < | files: LongWord; |
73 | < | i, done: LongWord; |
72 | > | files: Integer; |
73 | > | i, done: Integer; |
74 | selonly: Boolean; | |
75 | < | fileid: LongWord; |
75 | > | fileid: Integer; |
76 | filename: String; | |
77 | path: String; | |
78 | begin |
– | Removed lines |
+ | Added lines |
< | Changed lines (old) |
> | Changed lines (new) |