当我关闭窗口时出现出现“无效的窗口句柄”的错误，应该怎样解决呢

2005-04-20 08:35:10 672 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

Qt Vtk wglMakeCurrent failed in MakeCurrent(), error: 句柄无效。问题描述 Qt的界面中使用了QVTKWidget这个控件，在点击窗口右上角关闭按钮时，报错：wglMakeCurrent failed in MakeCurrent(), error: 句柄无效。解决方法通过重写void closeEvent(QCloseEvent *event)这个函数，手动将所有QVTKWidget类型的控件删除，再将窗口关闭。示例 Qt设计界面中的QVTKWidget类型的控件如下： MyMainWindow.h class MyMainWindow : public QMa 阅读详情

function MyThreadFunc(P:pointer):Longint;stdcall;

var
page,allpage,i,j,n:integer;
username:string;
ifhave:boolean;
begin

form1.NMHTTP1.Get(form1.Edit1.Text);
form1.Memo1.Lines.Text:=form1.NMHTTP1.Body;

for i:=0 to form1.Memo1.Lines.Count-1 do
begin
form1.Memo2.Lines.Add(form1.Memo1.Lines.Strings[i])
end;

end;

procedure TForm1.Button1Click(Sender: TObject);
begin

hthread:=CreateThread(nil,0,@MyThreadFunc,nil,0,ThreadID);
if hThread=0 then
messagebox(Handle,'Didn’t Create a Thread',nil,MB_OK);

end;

当我关闭窗口时出现出现“无效的窗口句柄”的错误，应该怎样解决呢？是不是要先结束线程呢？
我有试过在关闭窗口前调用：

form1.NMHTTP1.Abort;
GetExitCodeThread(hthread,lpexitcode);
TerminateThread(hthread,lpexitcode);

但关闭窗口后，还是出现以上错误~~~大家知道怎样解决吗？或者可以提供能够在线程中实现以下代码的运行吗？

var
page,allpage,i,j,n:integer;
username:string;
ifhave:boolean;
begin

form1.NMHTTP1.Get(form1.Edit1.Text);
form1.Memo1.Lines.Text:=form1.NMHTTP1.Body;
for i:=0 to form1.Memo1.Lines.Count-1 do
begin
form1.Memo2.Lines.Add(form1.Memo1.Lines.Strings[i])
end;

end;

...全文