Извлечение данных из внешнего приложения

String GetTextSB(HWND hWnd,int part)
{
    HANDLE hProcess;
    DWORD dwProcessId;
    DWORD lpNumberOfBytesRead;
    LPVOID lpBaseAddress;
    char lpCommonBuffer[255];
    String result;
 
    GetWindowThreadProcessId(hWnd, &dwProcessId);
 
    if ((hProcess = OpenProcess(PROCESS_ALL_ACCESS, false, dwProcessId)) != NULL)
    {
        if ((lpBaseAddress = VirtualAllocEx(hProcess, NULL, sizeof(lpCommonBuffer) + 1, MEM_COMMIT, PAGE_READWRITE)) !=NULL )
        {
            if (SendMessage(hWnd, SB_GETTEXT, part, (LPARAM) lpBaseAddress) != 0)
            {
                if (ReadProcessMemory(hProcess, lpBaseAddress, &lpCommonBuffer, sizeof(lpCommonBuffer), &lpNumberOfBytesRead))
                {
                    result=lpCommonBuffer;
                }
            }
            VirtualFreeEx(hProcess, lpBaseAddress, sizeof(lpBaseAddress) + 1, MEM_RELEASE);
        }
        CloseHandle(hProcess);
    }
return result;
}
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
HANDLE window=(void*)395758;//хэндл статус бара подсмотренный с помощью WinSpy
ShowMessage(GetTextSB(window,2));//Второй параметр - номер ячейки в Статусбаре. Можно просто попробовать от 0 до 10.
}