симуляция нажатий клавиш

[4321]

Terran tak kak vi skazali rabotaet ia dumaiu sto problema v tom sto kogda ia nazimaiu knopku to aktivnim stanovitsia moio okno ane to v kotorom nujno pecatat esli eto tak to kak resit etu problemu

[4321]

rebiat pomogite pliiiizzzz

[mihali4]

4321
Быстренько переходим на русский, как и было в начальных постах.
Никто не собирается ломать глаза на вашем ломаном "транслите".

[4321]

я извиняюсь Михаил4 виноват!!!
помогите ребят

[Terran]

Сообщение от 4321

Terran tak kak vi skazali rabotaet ia dumaiu sto problema v tom sto kogda ia nazimaiu knopku to aktivnim stanovitsia moio okno ane to v kotorom nujno pecatat esli eto tak to kak resit etu problemu

Попробуйте так:

Procedure TForm1.Button1Click(Sender: TObject);
Var
H: HWND;
S: Integer;
Begin
H:=FindWindow(Nil, 'Мой компьютер');
If H=0 Then
Exit;
S:=H;
SetForegroundWindow(S);
End;