pascal: made a demo of using sqldb