[lmikle]

Нет, не нужно. GroupBox - это контейнер, т.е. Parent для Edit'а.
В параметре Sender тебе передается указатель на компонент, вызвааший событие. Таким образом можно написать так:

Код:

procedure TForm1.EditChange(Sender : TObject);
begin
  If (Sender Is TEdit) Then
    If (Sender As TEdit).Parent Is TGrpupBox Then
      ((Sender As TEdit).Parent As TGrpupBox).Color := clBLue;
end;