21.06.2012, 19:47
|
|
Модератор
|
|
Регистрация: 17.04.2008
Сообщения: 8,096
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
|
|
Подозреваю, что тут:
Код:
DrawText(ACanvas.Handle, pchar(TMenuItem(Sender).Caption),
length(TMenuItem(Sender).Caption), ARect, DT_LEFT or DT_VCENTER); |