Str:array[0..255] or char;
var buf:array[0..1000] of char; GetWindowText(wnd, buf, 255); showmessage(buf);
GetDlgItemText(wnd, getwindowlong(wnd,GWL_ID), buf, 255);