KeyDown i memo virker ikke

Hvorledes kan det være, at når jeg har udfyldt første linie (linie 0), så virker det andet ikke?

  if memo1.lines[0] = 'Goddag' then
  memo2.lines[0] := 'Goddag - hvordan går det?';

  begin
    if memo1.lines[1] = 'Det går fint' then
    memo2.lines[1] := 'Det lyder godt - jeg har det også godt';

  end;
  end;