Появилась необходимость создать non client area на TCustomControl. Всегда думал, что для этого достаточно сдвинуть ClientOrigin на нужное расстояние, но практика показала, что после перекрытия метода GetClientOrigin и при кидании на такой контрол других контролов сдвигается только контур дочернего контрола, а прорисовка остается в старых координатах (теперь вообще не понятно зачем нужен ClientOrigin, если прорисовка всегда с 0,0). Нет времени разбираться, может кто из корифеев подскажет как проще это сделать (создать non client area на TCustomControl)?

В лазарусе ?

Да, Игорь, речь идет о Lazarus... классы общего назначения являются частью FPC (да и сам Lazarus является надстройкой над FPC), поэтому, думаю, резонно было изложить свой вопрос в разделе Free Pascal...

Удалено модератором