evento WMWindowPosChanging en TForm

[[Lepe]]

Según he mirado con el Grep Search, el windowposchanging lo implementa la clase TCustomForm y TToolbar, el Tedit nop.

Mira, llevo con este mensaje dándole vueltas más de media hora, no entiendo lo que quieres hacer ni como funciona el tema.

Desde mi punto de vista, el Form que contiene el TkEdit debería tener un evento llamado por ejemplo OnMoving y el tkEdit un procedimiento llamado DoOnParentMoving. Cuando Creas el Form, asignas el evento OnMoving y dentro podrás poner:

Código Delphi [-]
procedure TForm1.FormMoving(Sender:TObject);
begin 
  tkedit1.doOnParentMoving;
end;

Tampoco entiendo el diseño, ¿Por qué un descendiente de TEdit puede crear dos barras flotantes?

Lo normal sería que un Form tuviese dos propiedades :
HasHorziontalBar:Boolean;
HasVerticalBar:Boolean;

Cuando se pone alguna en True, el propio Form crearía la barra adosada.

Y esto lo digo porque:
- ¿que ocurre si pones tu Tkedit sobre un panel del Form? las barras aparecerían ¡¡ sobre el panel !!
- no piensas usar Frames ¿verdad? porque estarías en las mismas.

Edito: En realidad llevo más de 40 minutos, porque Al no había contestado antes de empezar a escribir esto

Saludos