Einzelnen Beitrag anzeigen

Frankfurtoder

Registriert seit: 27. Mär 2008
112 Beiträge
 
RAD-Studio 2010 Pro
 
#1

virtuelle keys in stringlist speichern

  Alt 20. Mai 2008, 13:44
Hallo!

Ich simuliere eine ganze Reihe von Tastendrücken und möchte nun diese in eine Stringlist speichern um danach die Stringlist zu zerlegen. Die einzelnen Passagen des Strings sind durch ein CharReturn makiert, an denen ich später die Stringzerlegung vornehmen möchte.

Frage ist nun, wie kriege ich die Tasten in meine Stringlist?

Danach kann ich die Stringlist mittels Pos, Copy und Delete doch zerlegen, oder wird es schwierigkeiten geben? Immerhin ist als Delimitter dann #13 angegeben und ich bin mir nicht sicher, ob er ihn dort erkennt. Denn wenn ich die Tasten in ein Editfeld ausgebe und den String dort zerlegen möchte, findet er kein CharReturn.

Ich simuliere die Keys so:

Delphi-Quellcode:
procedure TWoz.BlubbClick(Sender: TObject);
begin
  keypress($50,1);
  keypress($31,0);
  keypress($32,0);
  keypress($34,0);
  keypress($13,0);
  keypress($49,0);
  keypress($4B,0);
  keypress($45,1);
end;

procedure TWoz.Keypress(key:byte; i:integer);
var sl:tstringlist;
begin
  if i = 1 then
    keybd_event(VK_SHIFT, 0, 0, 0);

  keybd_event(ord(key), 0, 0, 0);
  keybd_event(ord(key), 0, KEYEVENTF_KEYUP, 0);

  keybd_event(VK_SHIFT, 0, KEYEVENTF_KEYUP, 0);

  //hier sollte ja nun irgendwie die stringlist gefüllt werden
end;
Danke!
Erik
  Mit Zitat antworten Zitat