Controle de caixa

Alguem poderia me dizer onde posso encontrar um programa desenvolvido em delphi que faça o controle de caixa ( supermercado, farmacia, etc ). Um exemplo para que eu possa entender como funciona, pode ser demo, mas que tenha o codigo fonte aberto. Agradeço demais se puder me ajudar nessa