[Sky.NET]

Если я тебя правильно понял, то тебе нужно чтобы при нажатии горячей клавиши, если присутствует она в одном из Edit'ов, то добавить текст из LableEdit'а токого же порядкового номера, что и Edit с этой клавишей?
Если да, то сделай так:

Код:

procedure TForm2.Edit3KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
var
  i: integer;
begin
  if ssAlt in Shift then
    for i := 1 to 9 do
      if chr(Key) = TEdit(FindComponent('Edit' + IntToStr(i))).Text then
        Memo1.Lines.Add(TEdit(FindComponent('LEdit' + IntToStr(i))).Text);
end;

Т.к. дополнительных компонентов я не ставил, то сделал на примере стандартных.