Solo ejecutar un procedimiento cuando solo la ventana esta activa

[feliz-58]

De la forma que dices lo probé, y funciona, pero mi intención principal es que se haga en tiempo real.

El codigo es el siguiente

Código Delphi [-]
var
a,b,c : real;

begin
a:=strtofloat(dbedit9.Text);
b:=Strtofloat(dbedit11.Text);
c:=a*b;
dbedit12.Text:=floattostr(C);
end;