Changeset 28 for trunk/Forms/UFormImportSources.pas
- Timestamp:
- Jul 12, 2016, 4:28:22 PM (8 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/Forms/UFormImportSources.pas
r22 r28 146 146 procedure TFormImportSources.AProcessExecute(Sender: TObject); 147 147 begin 148 if Assigned(ListView1.Selected) then 148 if Assigned(ListView1.Selected) then begin 149 149 TImportSource(ListView1.Selected.Data).Process; 150 ShowMessage(Format(SAddedCount, [TImportSource(ListView1.Selected.Data).ItemCount])); 151 end; 150 152 end; 151 153
Note:
See TracChangeset
for help on using the changeset viewer.