PerformFFT(FFFTBuffer); end;

Here is a curated look at the types of FMX samples you should be exploring right now to level up your skills.

Bar.Material := TColorMaterial.Create(Color);