[Delphi] "Wstukanie" zdania zapisanego w TEdit

Witam serdecznie

Nie potrafie sobie poradzic z nastepujaca kwestia.

Uzytkownik w komponencie TEdit wpisuje jakies zdanie. Chcialbym odczytac to zdanie do pamieci by moc po chwili zmusic Delphi aby "wystukalo" to zdanie z klawiatury. Wiem w jaki sposob wymusic klikniecie mysza czy wstukanie pojedynczego znaku ale nie wiem jak zrobic czynnosc ktora opisalem powyzej. Prosze o pomoc.

Korzystam z Delphi 6

Pozdrawiam

Nie bardzo rozumiem Twój problem ale z tego co mi sie wydaje to wystarczy po prostu zapisac zdanie do zmiennej a potem symulowac w petli naciskanie kolejnych klawiszy :|

A jeśli chodzi Ci o symulowanie wciskania klawiszy to dla każdego znaku tekstu zastosuj

  keybd_Event(Ord(znak),0,0,0);

Chodzi mi dokladnie o to o czym mowicie. Problem w tym, ze nie wiem jak zrobic wstukiwanie poszczegolnych liter w petli, gdy zdanie znajduje sie juz w zmiennej :(
Dobrze by bylo gdyby na koncu (po wklepaniu tekstu ze zmiennej) nacisniety zostal jeszcze Enter.

Prosze pomozcie

procedure wystukaj(s: string);
var
i:integer;
begin
  s := UpperCase(s);
    for i:=1 to length(s) do
      begin
        keybd_event(ord(s[i]),1,0,0);
        keybd_event(ord(s[i]),1,KEYEVENTF_KEYUP,0);
      end;
     keybd_event(VK_RETURN,0,0,0);
     keybd_event(VK_RETURN,0,KEYEVENTF_KEYUP,0);
end;

W ten sposób 'wystukasz' tylko małe litery. Z wielkimi musisz programowo wciskać shift.