Delphi - "sdoppiare" componenti a runtime

come da titolo avrei bisogno di "sdoppiare" l'istanza di un componente che ho creato a design-time per ereditarne tutte le proprietà.
precisamente sto cercando di fare il classico gioco snake e per il "corpo" del serpente mi serve creare a runtime un componente in più per ogni oggetto "cibo" mangiato in modo che ogni nuovo "pezzo" della coda sia esattamente identico alla testa. come potrei fare?

istanza := TClasse.Create(AOwner);

TClasse e' il componente che devi ricreare, istanza e' il nome della variabile che rappresentera' l'oggetto.