You can choose compression type used when saving DDS file.
TImagingDDS Class
public property Compression: TDDSCompresion read FCompression write FCompression;
dcNone means that file will be saved in the current bitmaps pixel format.