Keypress erst nach Key ausführen

[naudoc]

Hallo,

ich habe folgendes Problem...
Ich möchte das Ereignis OnKeypress benutzen als Sucheinschränkung benutzen:

if pos(edit.text,X)>0 then ...

nun möchte ich aber, dass edit.text schon den Key enthält. Da ich mehrere eigene procedures aufrufen will fällt

if pos(edit.text+Key,X)>0 then ...

aus. Gibts ne möglichkeit, dass OnKeypress erstmal den Key "pressed" oder wie auch immer...?

Vielen Dank schonmal...