Eliminar objeto en StringList

[Stell DG]

Muchas gracias por contestarme, pero aun tengo un error y no he podido solucionarlo.
Te explico: Se crea un objeto1, al cabo de un tiempo se crea un objeto2 y sólo borra al objeto2 siendo que debería borrar al objeto1, y al 1 sólo lo ignora durante todo el programa y lo deja visible estorbando ahi jeje.
Tengo algo asi:

Código Delphi [-]
gente:= TImage.Create(self); //creo mis objetos
gente.Parent:=self;
gente.Transparent := true;
gente.left:=fila.value*60;
gente.Width :=50;
gente.Stretch:=true;
gente.Name:='gente_'+inttostr(g);
g:=g+1;

ListaImagenes := TStringList.Create(); //aqui creo la lista 
  ListaImagenes.Sorted := True;
  ListaImagenes.Duplicates:= dupError;
  ListaImagenes.AddObject(gente.name,gente); //guardo los objetos en la lista

y en otro botón por ejemplo quiero borrarlos pero conforme se fueron creando, primero borrar el objeto1, después el 2 y asi sucesivamente, para eso puse esto que me dijiste:

Código Delphi [-]
if ListaImagenes.Count > 0 then // si existen elementos...
  begin
    ListaImagenes.Objects[0].Free;
    ListaImagenes.Delete(0);

y segun yo asi debería borrar siempre el primero, pero no me queda bien. Espero me puedas orientar

De antemano gracias!