Ввод данных в стороннее приложение не с клавиатуры

HWND wnd, ed1,ed2, btn1,btn2,btn3;
char buff[500];
 
///////////////////////////////////////
// за функцию говорим спасибо товарищу Gremlin ;)
 
HWND NextWindowElement(HWND h, LPCTSTR fasdClass, LPCTSTR fasdWindow, int level)
{
    HWND h2 = NULL;
    for (int i = 0; i < level; i++) {
        h2 = FindWindowEx(h, h2, fasdClass, fasdWindow);
    }
    return h2;
}
 
/////////////////////////////////////////////
// производим только 1 раз
    wnd = FindWindow(NULL,L"iButton Tester"); // ищем окно тестера
    btn1 = FindWindowEx(wnd, NULL, NULL, L"Select"); //ищем кнопку Select
    btn2 = FindWindowEx(wnd, NULL, NULL, L"Read");  //ищем кнопку Read
    btn3 = FindWindowEx(wnd, NULL, NULL, L"Write");   //ищем кнопку Write
    ed1 = NextWindowElement(wnd, L"Edit", NULL, 1);  //поле около page
    ed2 = NextWindowElement(wnd, L"Edit", NULL, 2);  // поле между read & write
 
//////////////////
// производим сколько нужно и где нужно
  // как кликать
    SendMessage(btn1, BM_CLICK, 0, 0);  //кликаем по селекту
    SendMessage(btn2, BM_CLICK, 0, 0);  //кликаем по рил
    SendMessage(btn3, BM_CLICK, 0, 0);  //кликаем по райт
  // как записать в едиты
    SendMessage(ed1, WM_SETTEXT, 0, (LPARAM)Edit1->Text.w_str());   // пишем в поле около пейдж
    SendMessage(ed2, WM_SETTEXT, 0, (LPARAM)Edit1->Text.w_str());   // пишем в поле между read & write

SetCursorPos(random(Screen->Width),random(Screen->Height));

POINT cur_pos;
GetCursorPos(&cur_pos);

mouse_event(MOUSEEVENTF_LEFTDOWN,0,0,0,0); // нажали левую кнопку мыши
mouse_event(MOUSEEVENTF_LEFTUP,0,0,0,0); // отпустили левую кнопку мыши ( НЕ ЗАБЫВАТЬ )

cur_pos.x = cur_pos.x * (65535 / Screen->Height);
cur_pos.y = cur_pos.y * (65535 / Screen->Height);

HWND NextWindowElement(HWND h, LPCTSTR fasdClass, LPCTSTR fasdWindow, int level)
{
        HWND h2 = NULL;
        for (int i = 0; i < level; i++) {
                h2 = FindWindowEx(h, h2, fasdClass, fasdWindow);
        }
        return h2;
}

__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
}