Delphi中如何获取外部程序焦点所在控件的句柄

function GetFocusHandle: HWND;

var

h: HWND;

c: array[0102432] of Char;

idAttach: Cardinal;

begin

H := GetForegroundWindow;

idAttach := GetWindowThreadProcessId(h, nil);

if not AttachThreadInput(idAttach , GetCurrentThreadId(), True) then Exit;

Result := GetFocus;

AttachThreadInput(idAttach, GetCurrentThreadId(), false );

end;

计算公式为：a^2-b^2=c^2

如果长轴长在x轴上的话,焦距为(C,0),(-C,0），如果长轴长在y轴上的话,焦距为（0,C),(0,-C)。

其中：长轴长为：2a；短轴长为：2b；焦距为：2c。

扩展资料：

椭圆性质：

（1）范围：由方程可得|x|≤a，|y|≤b，因此椭圆位于直线x=±a，y=±b所围成的矩形里。

（2）对称性：椭圆既是轴对称图形，也是中心对称图形，它有两根对称轴，一个对称中心，一般地对于曲线f（x，y）=0，若以－y代y方程不变，则曲线关于x轴对称。

若以－x代x方程不变，则曲线关于y轴对称；若同时以－x代x，以－y代y方程不变，那么曲线关于原点对称，应结合点P（x，y）分别关于x轴、y轴、原点的对称点的坐标来理解和记忆。

参考资料来源：百度百科-椭圆的标准方程

c的平方等于a的平方减b的平方，c是焦点到原点的距离。

当焦点在x轴时，椭圆的标准方程是：x^2/a^2+y^2/b^2=1，(a>b>0)；

当焦点在y轴时，椭圆的标准方程是：y^2/a^2+x^2/b^2=1，(a>b>0)；

其中a^2-c^2=b^2

PF1+PF2>F1F2(P为椭圆上的点，F为焦点)

平面内到定点F1、F2的距离之和等于常数（大于|F1F2|）的动点P的轨迹，F1、F2称为椭圆的两个焦点。其数学表达式为：|PF1|+|PF2|=2a（2a>|F1F2|）。

扩展资料：

在直觉上，比较赋有几何性的椭圆坐标系 ；其中同样地， 2a的等值曲线是椭圆，而2c 的等值曲线是双曲线。在这里， 必须属于区间 ，而 必须大于或等于 。

椭圆坐标系是几种三维正交坐标系的基础。将椭圆坐标系往 z-轴方向投射，则可以得到椭圆柱坐标系。将椭圆坐标系绕着 x-轴旋转，就可以得到长球面坐标系，而绕着 y-轴旋转，又可以得到扁球面坐标系；在这里，x-轴是连接两个焦点的直轴，y-轴是在两个焦点中间的直轴。

参考资料来源：百度百科-椭圆坐标系

由椭圆定义得

｜AC｜+｜AF｜=｜BC｜+｜BF｜

易得｜AC｜=13,｜BC｜= 15

则有｜AF｜-｜BF｜=2

由双曲线定义可知此式为双曲线方程中的一支即 F 位于以 A、B为两焦点的双曲线下支,并可知 a=1,c=7,b^2=48

所以F的轨迹方程为y^2-x^2/48=1 (y

以上就是关于Delphi中如何获取外部程序焦点所在控件的句柄全部的内容，包括:Delphi中如何获取外部程序焦点所在控件的句柄、椭圆求焦点计算公式、椭圆焦点坐标怎么求等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！