[mirt steelwater]

первое - нет, не оно - мое на DelphiX, а это на GDI, хотя тоже интересно.
второе - да, но переделанное (написан класс TMirror, более удобен в работе, хотя писал давно - сейчас бы все переделал, конечно).