سلام
این پروسیجر مربوط به KeyDown یه استرینگ گریده
procedure TForm1.sg1KeyDown(Sender: TObject; var Key: Word;  Shift: TShiftState);

ولی من توی فراخوانی اون از جاهای دیگه مشکل دارم مثلا وقتی کد زیر رو مینویسم پیغام خطا میده
    sg1KeyDown(Sender,key,tsh);

بنظر شما پارامترهای اون رو چطور باید بنویسم ؟