请问错误:EInvalidOperation with message'Canvas does not allow drawing'

Question

是什么意思?我用了一个showmessage()就出这个错,不用就没错
不知道怎么回事.

Answer 1

InvalidOperation is raised when an application attempts an operation that requires a window or widget handle on a component that does not have a parent (The Parent property is Nil in Delphi or NULL in C++). This exception can also occur if a drag-and-drop operation is attempted from a form (for example, when calling the BeginDrag method of a form).

Answer 2

确实是在线程中,线程有一个onDone事件,在这个事件里showmessage.
procedure TMainForm.ConvDone(Sender: TComponent);
begin
    Tasks[CurrentExecTask].Status := tsComplete;
    if CurrentExecTask = High(Tasks) then
    begin
      EnableTaskWindows(WindowList);    //前面有个已经有个Windowlist:=DisableTaskWindows(ExecForm.handle)
      ExecForm.close; //关闭进度窗口
      showMessage('finished task(s)!');
    end;
end;