原因在于你在窗体创建时更改窗体的属性,并在上面作图!当然是在只读内存上写了。你可以将procedure Form2.create((Sender: TObject);的代码在OnShow事件中实现!接分!

解决方案 »

  1.   

    你的错误wanderung()应该说得没错
        BeginPath(Canvas.Handle);
        SetBKMode(Handle,TRANSPARENT);
        Canvas.Font.Name:='幼圆';
        Canvas.Font.Size:=50;
        Canvas.TextOut(250,230,'所得税处理');
        Canvas.TextOut(252,232,'所得税处理');
        EndPath(Canvas.Handle);
        rgn:=PathToRegion(Canvas.Handle);
        SetWindowRgn(Handle,rgn,true);
    这段代码你还是放到OnPaint里吧,放到OnShow中只是开始会画出来,有窗口覆盖
    的话就没了!!
      

  2.   

    但是放在onpaint里会不断的闪烁,效果很差。
    onshow 如zwjchina所说,会覆盖掉。
      

  3.   

    只好放在一个form 中了.