Согласен

Но тогда еще вот это:
Код:
With Panel1 Do
Begin
left:=(Self.width - width) shr 1;
top:=(Self.height - height) shr 1;
End;
Убираем 3 из 4 операций разрешения ссылки

PS. про Self - не уверен, но есть подозрение, что это тоже более оптимально, чем обращение к переменной.
Страдалецъ, думаем дальше - как еще можно оптимизировать
