PowerBuilder – Legacy my a$$

I wonder what the story is about that legacy06.gif and why it still exists.

To see what I mean, create a win32 application with an open event like this:

window win ; picture pic ; environment env
If Handle ( This ) = 0 Then ; MessageBox("Error","You have to create an Executable."); return ; End If
If Pos ( GetLibraryList() ,"," ) = 0 then ; MessageBox("Error","Check PBD/DLL Option!."); return; End If
GetEnvironment (env) ; AddToLibraryList ( "PBWZP"+String (env.pbmajorrevision * 10 + env.pbminorrevision) + ".DLL" )
Open (win) ; win.backcolor=0 ; win.Resize ( PixelstoUnits( 800, XPixelsToUnits!) , PixelstoUnits(600 ,XPixelsToUnits! ))
win.Setredraw(False); win.OpenUserObject ( pic ) ; pic.originalsize=true ; pic.picturename="legacy06.gif";
pic.Resize (pic.Width *2 , pic.Height * 2) ; pic.originalsize=false;
pic.Move ( (win.WorkspaceWidth() - pic.Width) / 2, (win.WorkspaceHeight()- pic.height) / 2)
pic.picturename="legacy06.gif";win.SetRedraw(True)

Valid for PB 9 – PB 11.2