Hola delphos1942.
Recién leo este hilo y primero que nada, te agradezco por publicar la solución que encontraste (cosa que no todos hacen).
Por otro lado me extraña la dificultad que te presenta el uso de la función
GetWindowText, en mi caso funciona correctamente.
Ejemplo:
Código Delphi
[-]
...
var
H: HWND;
Title: array[0..254] of Char;
begin
H := FindWindow(nil, 'Sin título: Bloc de notas');
GetWindowText(H, Title, GetWindowTextLength(H)+1);
ShowMessage(Title);
end;
Aprovecho también para pedirte que cuando agregues código a tu mensaje utilices las etiquetas correspondientes para hacerlo mas legible, el uso es:
Saludos
