Сообщество IT-специалистов
Ответы на любые вопросы об IT
Профессиональное развитие в IT
Удаленная работа для IT-специалистов
procedure TForm1.PageControl1Change(Sender: TObject); begin ActiveControl:= nil; end;