要はDelphiではこんなことができます、すごいでしょーっていう自己満足なんでしょ？