PUBLIC obaseform1 obaseform1=NEWOBJECT("BaseForm1") obaseform1.Show RETURN * DEFINE CLASS baseform1 AS Form Top = 0 Left = 0 Height = 640 Width = 800 DoCreate = .T. Name = "Baseform1" ADD OBJECT command1 AS commandbutton WITH ; Top = 118, ; Left = 141, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 1, ; Name = "Command1" ADD OBJECT command2 AS commandbutton WITH ; Top = 139, ; Left = 133, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 2, ; Name = "Command2" ADD OBJECT command3 AS commandbutton WITH ; Top = 159, ; Left = 146, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 3, ; Name = "Command3" ADD OBJECT command4 AS commandbutton WITH ; Top = 179, ; Left = 155, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 4, ; Name = "Command4" ADD OBJECT command5 AS commandbutton WITH ; Top = 199, ; Left = 166, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 5, ; Name = "Command5" ADD OBJECT command6 AS commandbutton WITH ; Top = 118, ; Left = 162, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 6, ; Name = "Command6" ADD OBJECT command7 AS commandbutton WITH ; Top = 139, ; Left = 154, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 7, ; Name = "Command7" ADD OBJECT command8 AS commandbutton WITH ; Top = 159, ; Left = 166, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 8, ; Name = "Command8" ADD OBJECT command9 AS commandbutton WITH ; Top = 179, ; Left = 175, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 9, ; Name = "Command9" ADD OBJECT command10 AS commandbutton WITH ; Top = 199, ; Left = 186, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 10, ; Name = "Command10" ADD OBJECT command11 AS commandbutton WITH ; Top = 118, ; Left = 183, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 6, ; Name = "Command11" ADD OBJECT command12 AS commandbutton WITH ; Top = 139, ; Left = 175, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 7, ; Name = "Command12" ADD OBJECT command13 AS commandbutton WITH ; Top = 159, ; Left = 187, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 8, ; Name = "Command13" ADD OBJECT command14 AS commandbutton WITH ; Top = 179, ; Left = 196, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 9, ; Name = "Command14" ADD OBJECT command15 AS commandbutton WITH ; Top = 199, ; Left = 207, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 10, ; Name = "Command15" ADD OBJECT command16 AS commandbutton WITH ; Top = 118, ; Left = 204, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 1, ; Name = "Command16" ADD OBJECT command17 AS commandbutton WITH ; Top = 118, ; Left = 225, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 6, ; Name = "Command17" ADD OBJECT command18 AS commandbutton WITH ; Top = 118, ; Left = 246, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 6, ; Name = "Command18" ADD OBJECT command19 AS commandbutton WITH ; Top = 118, ; Left = 267, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 1, ; Name = "Command19" ADD OBJECT command20 AS commandbutton WITH ; Top = 118, ; Left = 288, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 6, ; Name = "Command20" ADD OBJECT command21 AS commandbutton WITH ; Top = 118, ; Left = 309, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 6, ; Name = "Command21" ADD OBJECT command22 AS commandbutton WITH ; Top = 139, ; Left = 282, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 1, ; Name = "Command22" ADD OBJECT command23 AS commandbutton WITH ; Top = 139, ; Left = 303, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 6, ; Name = "Command23" ADD OBJECT command24 AS commandbutton WITH ; Top = 139, ; Left = 324, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 6, ; Name = "Command24" ADD OBJECT command25 AS commandbutton WITH ; Top = 159, ; Left = 269, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 1, ; Name = "Command25" ADD OBJECT command26 AS commandbutton WITH ; Top = 159, ; Left = 290, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 6, ; Name = "Command26" ADD OBJECT command27 AS commandbutton WITH ; Top = 159, ; Left = 311, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 6, ; Name = "Command27" ADD OBJECT command28 AS commandbutton WITH ; Top = 179, ; Left = 258, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 1, ; Name = "Command28" ADD OBJECT command29 AS commandbutton WITH ; Top = 179, ; Left = 279, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 6, ; Name = "Command29" ADD OBJECT command30 AS commandbutton WITH ; Top = 179, ; Left = 300, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 6, ; Name = "Command30" ADD OBJECT command31 AS commandbutton WITH ; Top = 199, ; Left = 249, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 1, ; Name = "Command31" ADD OBJECT command32 AS commandbutton WITH ; Top = 199, ; Left = 270, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 6, ; Name = "Command32" ADD OBJECT command33 AS commandbutton WITH ; Top = 199, ; Left = 291, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 6, ; Name = "Command33" ADD OBJECT command34 AS commandbutton WITH ; Top = 199, ; Left = 228, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 1, ; Name = "Command34" ADD OBJECT command35 AS commandbutton WITH ; Top = 180, ; Left = 216, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 9, ; Name = "Command35" ADD OBJECT command36 AS commandbutton WITH ; Top = 180, ; Left = 237, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 9, ; Name = "Command36" ADD OBJECT command37 AS commandbutton WITH ; Top = 159, ; Left = 207, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 1, ; Name = "Command37" ADD OBJECT command38 AS commandbutton WITH ; Top = 159, ; Left = 228, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 6, ; Name = "Command38" ADD OBJECT command39 AS commandbutton WITH ; Top = 159, ; Left = 249, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 6, ; Name = "Command39" ADD OBJECT command40 AS commandbutton WITH ; Top = 139, ; Left = 195, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 1, ; Name = "Command40" ADD OBJECT command41 AS commandbutton WITH ; Top = 139, ; Left = 216, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 6, ; Name = "Command41" ADD OBJECT command42 AS commandbutton WITH ; Top = 139, ; Left = 237, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 6, ; Name = "Command42" ADD OBJECT command43 AS commandbutton WITH ; Top = 139, ; Left = 260, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 6, ; Name = "Command43" ADD OBJECT command44 AS commandbutton WITH ; Top = 118, ; Left = 120, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 1, ; Name = "Command44" ADD OBJECT command45 AS commandbutton WITH ; Top = 118, ; Left = 329, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 1, ; Name = "Command45" ADD OBJECT command46 AS commandbutton WITH ; Top = 125, ; Left = 387, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 1, ; Name = "Command46" ADD OBJECT command47 AS commandbutton WITH ; Top = 133, ; Left = 407, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 1, ; Name = "Command47" ADD OBJECT command48 AS commandbutton WITH ; Top = 145, ; Left = 427, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 1, ; Name = "Command48" ADD OBJECT command49 AS commandbutton WITH ; Top = 158, ; Left = 448, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 1, ; Name = "Command49" ADD OBJECT command50 AS commandbutton WITH ; Top = 169, ; Left = 468, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 1, ; Name = "Command50" ADD OBJECT command51 AS commandbutton WITH ; Top = 189, ; Left = 472, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 1, ; Name = "Command51" ADD OBJECT command52 AS commandbutton WITH ; Top = 146, ; Left = 387, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 1, ; Name = "Command52" ADD OBJECT command53 AS commandbutton WITH ; Top = 154, ; Left = 408, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 1, ; Name = "Command53" ADD OBJECT command54 AS commandbutton WITH ; Top = 166, ; Left = 428, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 1, ; Name = "Command54" ADD OBJECT command55 AS commandbutton WITH ; Top = 178, ; Left = 448, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 1, ; Name = "Command55" ADD OBJECT command56 AS commandbutton WITH ; Top = 167, ; Left = 384, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 1, ; Name = "Command56" ADD OBJECT command57 AS commandbutton WITH ; Top = 175, ; Left = 405, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 1, ; Name = "Command57" ADD OBJECT command58 AS commandbutton WITH ; Top = 187, ; Left = 427, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 1, ; Name = "Command58" ADD OBJECT command59 AS commandbutton WITH ; Top = 200, ; Left = 449, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 1, ; Name = "Command59" ADD OBJECT command60 AS commandbutton WITH ; Top = 208, ; Left = 471, ; Height = 22, ; Width = 22, ; Caption = "Command1", ; ZOrderSet = 1, ; Name = "Command60" ADD OBJECT shape1 AS shape WITH ; Top = 246, ; Left = 105, ; Height = 236, ; Width = 423, ; Curvature = 99, ; Name = "Shape1" ADD OBJECT label1 AS label WITH ; FontBold = .T., ; Alignment = 2, ; Caption = "SCENE", ; Height = 17, ; Left = 216, ; Top = 347, ; Width = 272, ; Name = "Label1" ENDDEFINE * *-- EndDefine: baseform1 **************************************************