He estado haciendo una pequeña búsqueda por Internet, y en Delphi se puede obtener mediante "Screen.ActiveForm". Dado que Builder también usa la VCL seguramente se pueda mediante "Screen->ActiveForm ()" o similar.
Eso sí, puede que el comportamiento dependa del tipo de formulario (ventana) activa. Es decir, (no sé) quizá sea distinto si la ventana activa es modal o no, si es un diálogo, un "message box"...
Encontré la información en
esta pregunta de stackoverflow.