bloquear formulario activo
 

Buenas de nuevo,

Cometi el error de usar un contenedor (panel) para mostrar los formularios en el mismo para que parecieran mas bonitos y no pareciera que eran ajenos al formulario principal a la vez que se pudieran abrir varios formularios

Código Delphi [-]
procedure TPrincipal.tbutton_proveedoresClick(Sender: TObject);
begin
  if not assigned(fproveedores) then
   begin
   fproveedores:=tfproveedores.Create(application);
   fproveedores.Parent:=contenedor;
   fproveedores.Show;
   fproveedores.setfocus;
   end;
end;

Esto ha provocado que los campos tedit no dejen escribir en ellos aunque les ponga la opcion setfocus.

Existe alguna manera de bloquear dicho formulario para evitar que, si estoy haciendo insert o edit, se mantenga en dicho formulario sin poder pasar a otro?. Es decir, aunque tenga la propiedad show, dejar el formulario activo ?. Tendria que volver a los origenes y dejar los formularios como los tenia incialmente, con el showmodal.:(.

saludos y gracias

Hola,

Echa un vistazo al ejemplo que adjunto a ver si puede servirte de algo. ;)

Gracias por responder.

Ya lo habia probado, el problema surge si me paso a otro modulo y me regreso. Tendria que poner en el form.activate, otro setfocus, pero no funciona.

La idea, debido a que tengo varios edit y dbedit, es que todo el control se quede en el formulario, como si fuera un showmodal.

No se si algo parecido se pudiera hacer, en base a tenerlo activo.

gracias de nuevo

Hola,

Así a bote pronto se me ocurre que podemos deshabilitar todos los formularios excepto el que tenga el foco. Pero claro, esto se dice así a bote pronto...

gracias.
Si, quiza el que mas interesa es deshabilitar el principal pero, por razones obvias, te quedas sin los que dependan de el. Ya lo probe :(.
Si no le encuentro forma, tendre que volver al showmodal de siempre.
Interesante si es deshabilitar el resto de formularios sobretodo cuando se esten haciendo insert o edit.

Bueno, como complemento os dire que, a lo comentado por dec, lo que hice fue asignar un setfocus a cada click de mouse en los tedit que tenia a mano. Asi si funciona.
Lo que no me funciona bien, pero lo arreglare de alguna forma es en:

Código Delphi [-]
if not assigned(fagregausuario) then
     begin
    fagregausuario:=tfagregausuario.Create(application);
    fagregausuario.codigo:=codigo;
    fagregausuario.Parent:=contenedor;
   fagregausuario.Show;
     end;

Al hacer eso, no me pasa codigo a fagregausuario.codigo, ni tampoco se activa el onactivate del formulario. En cambio, si lo dejo como showmodal, si trabaja bien.

Seguire investigando.

No puedo editar el mensaje :(.

Añadiré que si me trabaja bien usando el evento onshow.