[Delphi] wielostronicowy TIFF w pamięci - liczba stron

Chcę uniknąć zapisywania pliku TIF na dysk i jednocześnie uzyskać informację o liczbie stron takiego pliku.
Jak to zrobić?
Być może ułatwieniem będzie, że ładuję taki plik do TXPress, który co prawda potrafi wskazać liczbę stron, ale niestety pliku TIF zapisanego na dysku (za pomocą NumPages)

Szkic kodu:

ms : TMemoryStream;
pBuf : ^Byte;
XP : TXpress;

TBlobField(s.FieldByName('xxx')).SaveToStream(ms);
ms.Position := 0;
pBuf:=ms.Memory;
XP.LoadBufferPtr(pBuf^, ms.Size);