Програмный ввод текста в другую программу

Send()

Edit1->Text.c_str()

  HWND wnd, hwnd;
  wnd = FindWindow("Nksp", 0);
  hwnd = FindWindowEx(wnd, 0, "ViewPort Window", 0);
  if(hwnd > 0)
  {
  ShowMessage("Activated");
  PostMessage(hwnd, WM_KEYDOWN, VK_RETURN, MapVirtualKey(VK_RETURN, 0) << 16 | 1);
  PostMessage(hwnd, WM_KEYUP, VK_RETURN, MapVirtualKey(VK_RETURN, 0) << 16 | 1 | 1 << 30 | 1 << 31);
 
  SendMessage(hwnd, WM_SETTEXT, 0, (LPARAM)"ÿ äëèííûé òåêñò, îñòàíóñü òîëüêî ÿ");
 
  PostMessage(hwnd, WM_KEYDOWN, VK_RETURN, MapVirtualKey(VK_RETURN, 0) << 16 | 1);
  PostMessage(hwnd, WM_KEYUP, VK_RETURN, MapVirtualKey(VK_RETURN, 0) << 16 | 1 | 1 << 30 | 1 << 31);

TStringList *temp1 = new TStringList;
temp1 = Memo1->Lines;

temp1->Add->Memo1->Lines;//извини здесь я неуверен надо пробовать

void Press(char ch)
{
  keybd_event(ch, 0, 0, 0);
  keybd_event(ch, 0, KEYEVENTF_KEYUP,0);
}

PostMessage(hwnd, WM_KEYDOWN, 0,  "я длинный текст, останусь только я");

keybd_event

if(hPNaviTop)
       {
             //....
       char *s=ClipbrdText.c_str(); // Передаваемый текст
       if (! SendMessage(hPNaviTop,WM_SETTEXT,strlen(s),int(s)) )ShowMessage("Do not Send Text Error#5");
            //...
       }
 else ShowMessage("Error#5");

if(hwnd > 0)
  {
    char *s = Memo1->Lines->Text.c_str();
    SendMessage(hwnd, WM_SETTEXT, strlen(s), int(s));
  }