`TGIFImage`
	ro	IsAnimated
		IsTransparent
	ro	NumFrames
	ro	NumIterations
		Animate
		CurrentFrame
		Visible

`ThtBitmap`
		BitmapMask
		WithTransparentMask

CT Web help

CodeTyphon Studio