Ver Mensaje Individual
  #7  
Antiguo 17-05-2012
BrunoBsso BrunoBsso is offline
Miembro
 
Registrado: nov 2009
Ubicación: Berisso, Buenos Aires, Argentina
Posts: 239
Reputación: 15
BrunoBsso Va por buen camino
Cita:
Empezado por roman Ver Mensaje
Un Edit también es una ventana. De hecho, todo TWinControl es una ventana, y sólo una ventana puede tener el foco. Entonces, si tienes un formulario con un Edit dentro y seleccionas éste, la ventana con el foco es el Edit, no el formulario.

Haz la prueba, poniendo este código en un SpeedButton (para que el clic en el botón no te mueva el foco):

Código Delphi [-]
var
  Buffer: array[Byte] of Char;

begin
  ZeroMemory(@Buffer, SizeOf(Buffer));
  GetClassName(GetFocus(), Buffer, 255);
  ShowMessage(Buffer);
end;

Verás que el nombre de lcase que obtienes es el del control seleccionado.

// Saludos
En este momento no puedo, pero ni bien pueda lo pruebo. No tenía idea que todo TWinControl era una ventana, me dejaste pasmado.
Mil gracias roman!
Responder Con Cita