Initialize:

lpack[1].kep := TPicture.Create;

Then later when you want to clean up and free memory;

lpack[1].kep.Free;