Sendkeys, "Enter" einbauen

[t.roller]

@TE: Aus Deinem Code geht nicht hervor, was die RETURN-Simulation machen soll.
Die 2 Zeilen Code brauchen natürlich ein Objekt, das auf die RETURN-Simulation reagiert - siehe Beispiel:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
caption:= 'B1';
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
Button1.SetFocus;

Keybd_Event(VK_RETURN,0,0,0); //Taste drücken
Keybd_Event(VK_RETURN,0,KEYEVENTF_KEYUP,0); //Taste loslassen

end;