お願いです。 Command パターンを使った例を教えてください
Object Pascal で。