Tenho uma tabela que contém Image em um campo Picture e vou colocá-las em um ImageList. Aqui está o código:

ImageList.Clear;
ItemsDts.First;
ImageBitmap:= TBitmap.Create;
try
  while not ItemsDts.Eof do
  begin
    if not ItemsDtsPicture.IsNull then
    begin
      ItemsDtsPicture.SaveToFile(TempFileBitmap);
      ImageBitmap.LoadFromFile(TempFileBitmap);
      ImageList.Add(ImageBitmap, nil);
    end;
    ItemsDts.Next;
  end;
finally
  ImageBitmap.Free;
end;

Mas tenho algum problema para imagens com tamanhos diferentes do tamanho do ImageLis

Update: Meu problema é que, ao adicionar uma imagem maior que o tamanho ImageList (32 * 32), por exemplo 100 * 150, ele não aparece corretamente em um componente conectado ao ImageList (por exemplo, em um ListView). Parece que a imagem recém adicionada não está esticada, mas está inclinada. Quero que a nova imagem seja esticada como no ImageList Edito