virtuelle keys in stringlist speichern

[Frankfurtoder]

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!

[mkinzler]

Die Stringliste musst du woanders deklarieren, da so jedesmal eine neue erstellet werden würde (wenn du das machen würdest)
Du erzeugst ja nie eine!

Delphi-Quellcode:

sl: TStrings;
...
sl := TStrignList.Create;