Fórum O pessoal qual o erro com o código #443784

ai galera to tentando fazer uma consulta em um checklistbox delphi 7. to usando o codigo abaixo, mas aparece um erro. "Undeclared identifier:'Key'"

procedure TfrmTransporteFluxoCaixa.btn_pesqClick(Sender: TObject);
var i : integer;
begin
if (Key=vk_Return) then begin
i := 0;
while ( (LowerCase(edt_localizar.Text)>LowerCase(clb_itens.Items.Strings[i])) and
(i<clb_itens.Count-1) ) do inc(i);
end;
end;

Que coisa não???