Вот так и лучше через SendMessage

SendMessage(HWND, WM_SETTEXT, 0, (LPARAM)Edit1->Text.c_str());

Но еси не катит то место SendMessage пиши Пост Мессадж

Для тебя так

PostMessage(h,WM_KEYDOWN,(LPARAM)StrToInt(Edit1->Text),0);

Ну еси буквы над мне подумать