Delphi регулярное выражение

Здравствуйте, подскажите как будет выглядеть регулярное выражение для парсинга например таких строк:
HR8GN-3NRZY-M92F7
MTD3Y-XBHNN-GMTGB-WCUPA
VE9NHT-H6TT7M
SRE4P-CTAET-M7AWC-EXAU4-UT3C6
RWWFKWK3GW

 

Code:

RWWFKWK3GW

количество символов известно?

для первого примера -

Code:

HR8GN-3NRZY-M92F7
([A-Z0-9]{5}\-[A-Z0-9]{5}\-[A-Z0-9]{5})

 

Огромное человеческое спасибо !