Komponenten durchgehen und darauf zugreifen?

[Nine9]

wie kann ich alle Komponenten durchgehen und dann jedes einzelne dessen Left wert dem panel als ausgabe geben
also eigentlich sollte dann immer die letzte komponente dessen left wert ausgegeben werden.
Sinn dahinter am ende sollen alle neuen verschobenen Images dessen leftwerte in einer Datenbank gespeichert werden.
Hat da jemand eine Idee?

Delphi-Quellcode:

for i := FOGantt.ComponentCount - 1 downto 0 do
   begin



    
    if FOGantt.Components[i] is Timage then
    begin

     Panel3.caption := inttostr( Components[i].left) ;