Ver Mensaje Individual
  #1  
Antiguo 05-11-2012
Avatar de Al González
[Al González] Al González is offline
In .pas since 1991
 
Registrado: may 2003
Posts: 5.604
Reputación: 30
Al González Es un diamante en brutoAl González Es un diamante en brutoAl González Es un diamante en brutoAl González Es un diamante en bruto
Probando la función RealGetWindowClass

Un favor. Les estaré agradecido si pudieran realizar esta sencilla prueba en Delphi de la función de la API de Windows RealGetWindowClass y decirme qué resultado les arroja en pantalla:

Código Delphi [-]
Function BaseClassName (Const Window :THandle) :String;
Var
  Name :Array [0..255] Of Char;
Begin
  SetString (Result, Name,
    RealGetWindowClass (Window, Name, Length (Name)));
End;

procedure TForm1.Button1Click(Sender: TObject);
begin
  ShowMessage (BaseClassName (Button1.Handle));
end;

En mi caso y con Windows XP, la cadena que devuelve BaseClassName es 'Button'. Me interesa conocer si esto será así en todas las versiones de Windows, o si en algunos casos Windows pudiera devolver la cadena totalmente en mayúsculas.

La duda me surge a raíz de que toda la documentación oficial sobre las clases predefinidas de Windows, refieren a éstas con letras mayúsculas (BUTTON, EDIT, COMBOBOX, etcétera). Quiero estar seguro de que si RealGetWindowClass devuelve "Button", entonces siempre será "Button" y no a veces "BUTTON".

Muchas gracias, saludos.
Responder Con Cita