String erkennen und Tastendrücke simulieren

[Innos]

Hiho liebe DP-Gemeinschaft^^

hab ma wieda ein problem -.-
ich hab ein edit feld in das ich ein ganzen Satz schreibe (mit groß- und kleinbuchstaben): z.B. "Hallo liebe DP-Gemeinschaft!"

dieser satz soll dann (in einem anderen programm) per Tastendruck simulation korrekt ausgegeben werden...

ich habe es bisher so, dass KEINE großbuchstaben und KEINE sonderzeichen geschrieben werden können -.-

Delphi-Quellcode:

Procedure SendString(Text:String);
var
  i : integer;
begin

  for i := 1 to (length(text)) do
    begin
   Keybd_Event(Ord(Text[i]),0,0,0);
   Keybd_Event(Ord(Text[i]),0,KEYEVENTF_KEYUP,0);
   end;

end;

procedure TForm1.Button1Click(Sender: TObject);
var satz:String;
begin
satz:=Edit1.Text ;
SendString(satz);

end;

geht auch soweit alles aba ich darf in das edit feld NUR großbuchstaben eingeben... also wie erkennt er selber, was da für ein zeichen steht und wandelt das in deren addressen um?? bitte helft mir hab echt scho ewig probiert und die SuFu hat auch nix gebracht

vielen Dank schon ma
mfg