delphi - How to make TProgressColumn work when used with LiveBindings and datase Tstringlist delphi пример использования