char 转换为integer的问题

[zzyx]

代码如下：
编译时候提示integer和char不兼容

procedure TfrmLookup.DBGrid1KeyPress(Sender: TObject; var Key: Char);
begin
//当有键盘按下且当前字段是lookup的

if DBGrid1.SelectedField.Lookup then
begin
SendMessage(txtLookup.Handle,WM_CHAR,key,0);
end;
end;

问题：如何把Char类型的Key转换为Integer？

[zzyx]

补充：txtLookup是一个TEdit

[fengjn]

ord()

[lincanwen]

SendMessage(txtLookup.Handle,WM_CHAR,Integer(key),0);

[zzyx]

谢谢各位