[NumLock]

Сообщение от Ildar-tsr

Компилятор в помощь.

каким местом? если написать:

Код:

procedure TForm1.FormResize(Sender: TObject);
begin
  Form1.FormActivate(Sender);
end;

и переименовать форму, то красный Form1 не изменится.