Delphi Cookbook - Third Edition

How it works...

When launched, the app loads the available effects, inspecting all the TEffectFilter descendants placed on the form, and stores the component reference in a dictionary indexed with the ListItem index in the list. To create a friendly effect name for the UI, the effect's class name is used. Indeed, all the effect classes have the typical Pascal case naming convention (just like everything else in Delphi) and the EffectNameByClassName method uses a regular expression to make a string such as TRadialBlurEffect into something like the radial blur effect. To do this, the initial T is removed and then it is used as a regular expression and the words are split, as shown in the following code:

function TMainForm.EffectNameByClassName( ...