Clic a un tbutton y que no se quede el foco

niñotaliban · #1 17-11-2005

es una mera cuestión estética, no quiero que se vea el foco en ningun lugar (salvo en el edit si hace falta. y lo de ocultar el cursor es genial, ya lo leí buscando información antes de postear).

Os habeis fijado en la calculadora de windows? el foco no se ve por ningún lugar, tan simple y tan bien hecha, es genial.

Aunque como dice dec talvez si que se le puede llamar formulario sin controles, o descontrolado

niñotaliban · #2 17-11-2005

y poque demonios no puedo hacer un setfocus teniendo un panel desactivado (no al que le doy el focus)?? o invisible.

ContraVeneno · #3 17-11-2005

El punto es:
No existe ninguna razón lógica para ponerle el foco a un control que esta desactivado o invisible.

supongo que por eso no puedes ponerle el foco a un control que esta desactivado o invisible.

Revisa muy bien las propiedades del control cuando le pasas el foco, ya que si el control esta activado y visible, no debe tener ningún problema en recibir el foco. Toma en cuenta que si desactivas un Group Panel, ningúno de los controles contenidos en el mismo podrán recibir el foco.

niñotaliban · #4 18-11-2005

Revisando me he dado cuenta que deshabilitaba un panel por codigo y luego intentaba pasar el foco a un elemento dentro de este.

Pero ahora lo que no entiendo es porqué me dice "cannot focus a disabled or invisible window" si ago lo siguiente. (y no hay nada más, un form, un edit, y el procedure de aquí abajo):

Código Delphi [-]procedure TForm1.FormCreate(Sender: TObject);
begin
edit1.setfocus;
end;

En cambio si quito el formcreate y pongo porejemplo un botón que me asigna el foco al edit cuando clico, logicamente no me da el error.(pero el edit y el form son los mismos)

Código Delphi [-]procedure TForm1.Button1Click(Sender: TObject);
begin
edit1.setfocus;
end;

Claro que alomejor es que en el formcreate aún no se ha creado el edit y claro, ¿a quien le va a enviar el foco?

.... Creo que me quedan muchas horas de delphi por delante jejeje

vtdeleon · #5 18-11-2005

Pues asi como dices. Cuando intentas asignar el foco, todavia el edit no esta creado, ponlo en otro evento(OnShow o OnActive), o mejor aun pon su propieda TabOrder en 0 y evitas poner codigo

Saludos

dec · #6 18-11-2005

Hola,

Cita:

Empezado por Troi

(...) mejor aun pon su propieda TabOrder en 0 y evitas poner codigo (...)

También podría utilizar la propiedad "ActiveControl" del formulario. Aquí un extracto de la descripción de dicha propiedad:

Cita:

Empezado por Ayuda de Delphi

If the form does not have focus, ActiveControl is the control on the form that will receive focus when the form receives focus.

Es posible que dicha propiedad "ActiveControl" esté en el "inspector de objetos" (sea published) con el fin de asignar un control en tiempo de diseño: dicho control tomará el foco según lo tome el formulario que lo contenga, o sea, según se muestre un determinado formulario.

[Lepe] · #7 18-11-2005

Cita:

Empezado por vtdeleon

Pues asi como dices. Cuando intentas asignar el foco, todavia el edit no esta creado, ponlo en otro evento(OnShow o OnActive), o mejor aun pon su propieda TabOrder en 0 y evitas poner codigo

A mi ya me "reprendieron" en un hilo por hacer la misma afirmación, así que ahora me toca a mí hacer la .... la ... ¿reprensión?

En realidad cuando llega el evento OnCreate, todos los componentes de la ventana si están creados, de hecho, puedes usar Edit1.Text := 'bla bla'.

El Edit, como su Form, están ocultos, (invisibles), de ahí el mensaje.

saludos