情況是這樣,我自己寫了個小程式,把其他程式的外邊框,最大最小,標題都給去了。。
Winapi.Windows.SetParent(MabinogiWindow,_MainForm.Handle);
SetWindowLong(MabinogiWindow,-16,GetWindowLong(MabinogiWindow,-16) and -8388609 and -12582913 and -262145);
SetWindowPos(MabinogiWindow, 0, 0, 0,_MainForm.ClientWidth,_MainForm.ClientHeight, $4);
然后,把其他程式掛接到我的程式上以后,我想使用FormResize事件來修改表單的大小。。
procedure T_MainForm.FormResize(Sender: TObject);
begin
if MabinogiWindow <>0 then
SetWindowPos(MabinogiWindow, 0, 0, 0,_MainForm.ClientWidth,_MainForm.ClientHeight,
SWP_NOMOVE or SWP_NOACTIVATE or SWP_NOOWNERZORDER or SWP_DEFERERASE);
end;
如果我一點點,一點點的拉,不會造成程式無限卡死現象,如果我是一下來到很大,那么,我的程式就會出現各種亂跳,卡死,未回應等情況,請問我要怎么解決呢~
uj5u.com熱心網友回復:
是不是FormResize回圈呼叫了,加個標志只運行一次試試轉載請註明出處,本文鏈接:https://www.uj5u.com/houduan/84776.html
標籤:VCL組件開發及應用
