Changeset 7 for trunk/Forms/ufrmmain1.lfm
- Timestamp:
- Nov 22, 2012, 7:09:17 AM (11 years ago)
- Location:
- trunk
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk
- Property svn:ignore
-
old new 3 3 Lazes.lps 4 4 Lazes.dbg 5 Lazes
-
- Property svn:ignore
-
trunk/Forms/ufrmmain1.lfm
r6 r7 5 5 Width = 459 6 6 Caption = 'Lazes - Lazarus Mazes' 7 ClientHeight = 3 707 ClientHeight = 366 8 8 ClientWidth = 459 9 9 Constraints.MinHeight = 300 10 10 Constraints.MinWidth = 300 11 11 Menu = MainMenu1 12 OnClose = FormClose 12 13 OnCreate = FormCreate 13 14 OnDestroy = FormDestroy … … 3337 3338 } 3338 3339 Stretch = True 3339 Visible = False3340 3340 end 3341 3341 object pbMaze: TPaintBox … … 3356 3356 Caption = '&File' 3357 3357 object MenuItem2: TMenuItem 3358 Action = FileExit13358 Action = AFileExit 3359 3359 end 3360 3360 end … … 3362 3362 Caption = '&Maze' 3363 3363 object MenuItem7: TMenuItem 3364 Action = acNewMaze3364 Action = AMazeNew 3365 3365 end 3366 3366 object MenuItem4: TMenuItem 3367 Action = actMetricsPopUp 3367 Action = AMetricsPopUp 3368 end 3369 object MenuItem9: TMenuItem 3370 Action = AMazeEnlarge 3371 end 3372 object MenuItem10: TMenuItem 3373 Action = AMazeShrink 3368 3374 end 3369 3375 object MenuItem5: TMenuItem … … 3371 3377 end 3372 3378 object MenuItem6: TMenuItem 3373 Action = acSolve 3379 Action = AMazeSolve 3380 end 3381 object MenuItem8: TMenuItem 3382 Action = ATerminate 3374 3383 end 3375 3384 end 3376 3385 end 3377 3386 object ActionList1: TActionList 3378 left = 883387 left = 96 3379 3388 top = 8 3380 object FileExit1: TFileExit3389 object AFileExit: TFileExit 3381 3390 Category = 'File' 3382 3391 Caption = 'E&xit' 3383 3392 Hint = 'Exit' 3384 3393 end 3385 object actMetricsPopUp: TAction3394 object AMetricsPopUp: TAction 3386 3395 Category = 'Maze' 3387 3396 Caption = '&Change maze metrics' 3388 OnExecute = actMetricsPopUpExecute3397 OnExecute = AMetricsPopUpExecute 3389 3398 ShortCut = 113 3390 3399 end 3391 object acSolve: TAction3400 object AMazeSolve: TAction 3392 3401 Category = 'Maze' 3393 3402 Caption = '&Solve maze' 3394 OnExecute = acSolveExecute3403 OnExecute = AMazeSolveExecute 3395 3404 ShortCut = 112 3396 3405 end 3397 object acNewMaze: TAction3406 object AMazeNew: TAction 3398 3407 Category = 'Maze' 3399 3408 Caption = '&Generate new maze' 3400 OnExecute = acNewMazeExecute3409 OnExecute = AMazeNewExecute 3401 3410 ShortCut = 116 3411 end 3412 object AMazeEnlarge: TAction 3413 Category = 'Maze' 3414 Caption = '&Enlarge' 3415 OnExecute = AMazeEnlargeExecute 3416 ShortCut = 114 3417 end 3418 object AMazeShrink: TAction 3419 Category = 'Maze' 3420 Caption = '&Shrink' 3421 OnExecute = AMazeShrinkExecute 3422 ShortCut = 115 3423 end 3424 object ATerminate: TAction 3425 Category = 'Maze' 3426 Caption = 'Terminate' 3427 OnExecute = ATerminateExecute 3428 ShortCut = 27 3402 3429 end 3403 3430 end … … 3405 3432 Interval = 10 3406 3433 OnTimer = TimerDrawTimer 3407 left = 1 523434 left = 176 3408 3435 top = 8 3409 3436 end
Note:
See TracChangeset
for help on using the changeset viewer.