Какой паттерн лучше использовать для работы с бд в delphi? И если не сложно, то желательно с примером.