File: GUI.lfm

package info (click to toggle)
ddrescueview 0.4.5-2
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 1,212 kB
  • sloc: pascal: 2,770; makefile: 8
file content (967 lines) | stat: -rw-r--r-- 28,203 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840
841
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872
873
874
875
876
877
878
879
880
881
882
883
884
885
886
887
888
889
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
906
907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
950
951
952
953
954
955
956
957
958
959
960
961
962
963
964
965
966
967
object MainForm: TMainForm
  Left = 985
  Height = 439
  Top = 396
  Width = 615
  AllowDropFiles = True
  Caption = 'ddrescueview'
  ClientHeight = 415
  ClientWidth = 615
  Color = clForm
  Constraints.MinHeight = 200
  Constraints.MinWidth = 600
  Menu = MainMenu1
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnDropFiles = FormDropFiles
  OnResize = FormResize
  OnShow = FormShow
  Position = poScreenCenter
  ShowHint = True
  LCLVersion = '2.0.10.0'
  object TopPanel: TPanel
    Left = 0
    Height = 113
    Top = 0
    Width = 615
    Align = alTop
    AutoSize = True
    BevelOuter = bvNone
    ClientHeight = 113
    ClientWidth = 615
    ParentFont = False
    TabOrder = 0
    object RescueStatusBox: TGroupBox
      Left = 4
      Height = 109
      Top = 2
      Width = 548
      Align = alLeft
      AutoSize = True
      BorderSpacing.Left = 4
      BorderSpacing.Top = 2
      BorderSpacing.Right = 4
      BorderSpacing.Bottom = 2
      Caption = 'Rescue status'
      ClientHeight = 92
      ClientWidth = 546
      ParentFont = False
      TabOrder = 0
      object RSCol1Panel: TPanel
        Left = 6
        Height = 90
        Top = 0
        Width = 161
        Align = alLeft
        AutoSize = True
        BorderSpacing.Left = 6
        BorderSpacing.Right = 6
        BorderSpacing.Bottom = 2
        BevelOuter = bvNone
        ChildSizing.LeftRightSpacing = 2
        ChildSizing.TopBottomSpacing = 2
        ChildSizing.HorizontalSpacing = 2
        ChildSizing.VerticalSpacing = 2
        ChildSizing.Layout = cclLeftToRightThenTopToBottom
        ChildSizing.ControlsPerLine = 2
        ClientHeight = 90
        ClientWidth = 161
        TabOrder = 0
        object lblInputSize: TLabel
          Left = 2
          Height = 16
          Hint = 'Size of the rescue device'
          Top = 4
          Width = 75
          BorderSpacing.CellAlignVertical = ccaCenter
          Caption = 'Input size:'
          ParentColor = False
          OnDblClick = rsLabelClick
        end
        object EditInputSize: TEdit
          AnchorSideLeft.Side = asrBottom
          Left = 79
          Height = 20
          Top = 2
          Width = 80
          BorderSpacing.Left = 2
          BorderStyle = bsNone
          Color = clForm
          Constraints.MaxWidth = 80
          ParentShowHint = False
          ReadOnly = True
          TabStop = False
          TabOrder = 0
          Text = 'EditInputSize'
        end
        object lblDomainSize: TLabel
          Left = 2
          Height = 16
          Hint = 'Size of the rescue domain'
          Top = 26
          Width = 75
          BorderSpacing.CellAlignVertical = ccaCenter
          Caption = 'Domain size:'
          ParentColor = False
          Visible = False
          OnDblClick = rsLabelClick
        end
        object EditDomainSize: TEdit
          AnchorSideLeft.Side = asrBottom
          Left = 79
          Height = 20
          Top = 24
          Width = 80
          BorderSpacing.Left = 2
          BorderStyle = bsNone
          Color = clForm
          Constraints.MaxWidth = 80
          ParentShowHint = False
          ReadOnly = True
          TabStop = False
          TabOrder = 1
          Text = 'EditDomainSize'
          Visible = False
        end
        object lblErrorCount: TLabel
          Left = 2
          Height = 16
          Hint = 'Number of distinct bad sector areas'
          Top = 48
          Width = 75
          BorderSpacing.CellAlignVertical = ccaCenter
          Caption = 'Error count:'
          ParentColor = False
        end
        object EditErrorCount: TEdit
          AnchorSideLeft.Side = asrBottom
          Left = 79
          Height = 20
          Top = 46
          Width = 80
          BorderSpacing.Left = 2
          BorderStyle = bsNone
          Color = clForm
          Constraints.MaxWidth = 80
          ParentShowHint = False
          ReadOnly = True
          TabStop = False
          TabOrder = 2
          Text = 'EditErrorCount'
        end
        object lblPending: TLabel
          Left = 2
          Height = 16
          Hint = 'Total size of pending areas (non-tried + non-trimmed + non-scraped)'
          Top = 70
          Width = 75
          BorderSpacing.CellAlignVertical = ccaCenter
          Caption = 'Pending:'
          ParentColor = False
          OnDblClick = rsLabelClick
        end
        object EditPending: TEdit
          AnchorSideLeft.Side = asrBottom
          Left = 79
          Height = 20
          Top = 68
          Width = 80
          BorderSpacing.Left = 2
          BorderStyle = bsNone
          Color = clForm
          Constraints.MaxWidth = 80
          ParentShowHint = False
          ReadOnly = True
          TabStop = False
          TabOrder = 3
          Text = 'EditPending'
        end
      end
      object RSCol2Panel: TPanel
        Left = 173
        Height = 90
        Top = 0
        Width = 183
        Align = alLeft
        AutoSize = True
        BorderSpacing.Left = 6
        BorderSpacing.Right = 6
        BorderSpacing.Bottom = 2
        BevelOuter = bvNone
        ChildSizing.LeftRightSpacing = 2
        ChildSizing.TopBottomSpacing = 2
        ChildSizing.HorizontalSpacing = 2
        ChildSizing.VerticalSpacing = 2
        ChildSizing.Layout = cclLeftToRightThenTopToBottom
        ChildSizing.ControlsPerLine = 3
        ClientHeight = 90
        ClientWidth = 183
        TabOrder = 1
        object ShapeFinished: TShape
          Left = 2
          Height = 10
          Top = 7
          Width = 10
          BorderSpacing.CellAlignHorizontal = ccaCenter
          BorderSpacing.CellAlignVertical = ccaCenter
          Brush.Color = clLime
          Constraints.MaxHeight = 10
          Constraints.MaxWidth = 10
        end
        object lblRescued: TLabel
          Left = 14
          Height = 16
          Hint = 'Rescued data block'
          Top = 4
          Width = 85
          BorderSpacing.CellAlignVertical = ccaCenter
          Caption = 'Rescued:'
          ParentColor = False
          OnDblClick = rsLabelClick
        end
        object EditRescued: TEdit
          AnchorSideLeft.Side = asrBottom
          Left = 101
          Height = 20
          Top = 2
          Width = 80
          BorderSpacing.Left = 2
          BorderStyle = bsNone
          Color = clForm
          Constraints.MaxWidth = 80
          ParentShowHint = False
          ReadOnly = True
          TabStop = False
          TabOrder = 0
          Text = 'EditRescued'
        end
        object ShapeOutsideDomain: TShape
          Left = 2
          Height = 10
          Top = 29
          Width = 10
          BorderSpacing.CellAlignHorizontal = ccaCenter
          BorderSpacing.CellAlignVertical = ccaCenter
          Brush.Color = 3421236
          Constraints.MaxHeight = 10
          Constraints.MaxWidth = 10
          Visible = False
        end
        object lblOutsideDomain: TLabel
          Left = 14
          Height = 16
          Hint = 'Block outside the rescue domain specified in the domain log file'
          Top = 26
          Width = 85
          BorderSpacing.CellAlignVertical = ccaCenter
          Caption = 'Not in domain'
          ParentColor = False
          Visible = False
          OnDblClick = rsLabelClick
        end
        object EditOutsideDomain: TEdit
          AnchorSideLeft.Side = asrBottom
          Left = 101
          Height = 20
          Top = 24
          Width = 80
          BorderSpacing.Left = 2
          BorderStyle = bsNone
          Color = clForm
          Constraints.MaxWidth = 80
          ParentShowHint = False
          ReadOnly = True
          TabStop = False
          TabOrder = 1
          Text = 'EditOutsideDomain'
          Visible = False
        end
        object ShapeBad: TShape
          Left = 2
          Height = 10
          Top = 51
          Width = 10
          BorderSpacing.CellAlignHorizontal = ccaCenter
          BorderSpacing.CellAlignVertical = ccaCenter
          Brush.Color = clRed
          Constraints.MaxHeight = 10
          Constraints.MaxWidth = 10
        end
        object lblBadSectors: TLabel
          Left = 14
          Height = 16
          Hint = 'Block which failed to read on the previous attempt'
          Top = 48
          Width = 85
          BorderSpacing.CellAlignVertical = ccaCenter
          Caption = 'Bad sectors:'
          ParentColor = False
          OnDblClick = rsLabelClick
        end
        object EditBadSectors: TEdit
          AnchorSideLeft.Side = asrBottom
          Left = 101
          Height = 20
          Top = 46
          Width = 80
          BorderSpacing.Left = 2
          BorderStyle = bsNone
          Color = clForm
          Constraints.MaxWidth = 80
          ParentShowHint = False
          ReadOnly = True
          TabStop = False
          TabOrder = 2
          Text = 'EditBadSectors'
        end
        object ShapeActive: TShape
          Left = 2
          Height = 10
          Top = 73
          Width = 10
          BorderSpacing.CellAlignHorizontal = ccaCenter
          BorderSpacing.CellAlignVertical = ccaCenter
          Brush.Color = clBtnFace
          Constraints.MaxHeight = 10
          Constraints.MaxWidth = 10
          Pen.Color = clAqua
        end
        object lblCurrentPos: TLabel
          Left = 14
          Height = 16
          Hint = 'Current read position on the rescue device'
          Top = 70
          Width = 85
          BorderSpacing.CellAlignVertical = ccaCenter
          Caption = 'Current pos:'
          ParentColor = False
          OnDblClick = rsLabelClick
        end
        object EditCurrentPos: TEdit
          AnchorSideLeft.Side = asrBottom
          Left = 101
          Height = 20
          Top = 68
          Width = 80
          BorderSpacing.Left = 2
          BorderStyle = bsNone
          Color = clForm
          Constraints.MaxWidth = 80
          ParentShowHint = False
          ReadOnly = True
          TabStop = False
          TabOrder = 3
          Text = 'EditCurrentPos'
        end
      end
      object RSCol3Panel: TPanel
        Left = 362
        Height = 90
        Top = 0
        Width = 178
        Align = alLeft
        AutoSize = True
        BorderSpacing.Left = 6
        BorderSpacing.Right = 6
        BorderSpacing.Bottom = 2
        BevelOuter = bvNone
        ChildSizing.LeftRightSpacing = 2
        ChildSizing.TopBottomSpacing = 2
        ChildSizing.HorizontalSpacing = 2
        ChildSizing.VerticalSpacing = 2
        ChildSizing.Layout = cclLeftToRightThenTopToBottom
        ChildSizing.ControlsPerLine = 3
        ClientHeight = 90
        ClientWidth = 178
        TabOrder = 2
        object ShapeNonTried: TShape
          Left = 2
          Height = 10
          Top = 7
          Width = 10
          BorderSpacing.CellAlignHorizontal = ccaCenter
          BorderSpacing.CellAlignVertical = ccaCenter
          Brush.Color = clGray
          Constraints.MaxHeight = 10
          Constraints.MaxWidth = 10
        end
        object lblNonTried: TLabel
          Left = 14
          Height = 16
          Hint = 'Block that has not yet been attempted to read'
          Top = 4
          Width = 80
          BorderSpacing.CellAlignVertical = ccaCenter
          Caption = 'Non-tried'
          ParentColor = False
          OnDblClick = rsLabelClick
        end
        object EditNontried: TEdit
          AnchorSideLeft.Side = asrBottom
          Left = 96
          Height = 20
          Top = 2
          Width = 80
          BorderSpacing.Left = 2
          BorderStyle = bsNone
          Color = clForm
          Constraints.MaxWidth = 80
          ParentShowHint = False
          ReadOnly = True
          TabStop = False
          TabOrder = 0
          Text = 'EditNontried'
        end
        object ShapeNonTrimmed: TShape
          Left = 2
          Height = 10
          Top = 29
          Width = 10
          BorderSpacing.CellAlignHorizontal = ccaCenter
          BorderSpacing.CellAlignVertical = ccaCenter
          Brush.Color = clYellow
          Constraints.MaxHeight = 10
          Constraints.MaxWidth = 10
        end
        object lblNonTrimmed: TLabel
          Left = 14
          Height = 16
          Hint = 'Block that was skipped by ddrescue on a read error (or slow read), to maximize performance. May contain readable data.'
          Top = 26
          Width = 80
          BorderSpacing.CellAlignVertical = ccaCenter
          Caption = 'Non-trimmed'
          ParentColor = False
          OnDblClick = rsLabelClick
        end
        object EditNontrimmed: TEdit
          AnchorSideLeft.Side = asrBottom
          Left = 96
          Height = 20
          Top = 24
          Width = 80
          BorderSpacing.Left = 2
          BorderStyle = bsNone
          Color = clForm
          Constraints.MaxWidth = 80
          ParentShowHint = False
          ReadOnly = True
          TabStop = False
          TabOrder = 1
          Text = 'EditNontrimmed'
        end
        object ShapeNonScraped: TShape
          Left = 2
          Height = 10
          Top = 51
          Width = 10
          BorderSpacing.CellAlignHorizontal = ccaCenter
          BorderSpacing.CellAlignVertical = ccaCenter
          Brush.Color = clBlue
          Constraints.MaxHeight = 10
          Constraints.MaxWidth = 10
        end
        object lblNonScraped: TLabel
          Left = 14
          Height = 16
          Hint = 'Trimmed block that has yet to be scraped (pre-1.19 ddrescue: Trimmed block that has yet to be split). May contain readable data.'
          Top = 48
          Width = 80
          BorderSpacing.CellAlignVertical = ccaCenter
          Caption = 'Non-scraped'
          ParentColor = False
          OnDblClick = rsLabelClick
        end
        object EditNonscraped: TEdit
          AnchorSideLeft.Side = asrBottom
          Left = 96
          Height = 20
          Top = 46
          Width = 80
          BorderSpacing.Left = 2
          BorderStyle = bsNone
          Color = clForm
          Constraints.MaxWidth = 80
          ParentShowHint = False
          ReadOnly = True
          TabStop = False
          TabOrder = 2
          Text = 'EditNonscraped'
        end
      end
    end
    object TopPiePanel: TPanel
      Left = 549
      Height = 109
      Top = 2
      Width = 64
      Align = alRight
      AutoSize = True
      BorderSpacing.Around = 2
      BevelOuter = bvNone
      ChildSizing.EnlargeVertical = crsHomogenousSpaceResize
      ChildSizing.Layout = cclLeftToRightThenTopToBottom
      ChildSizing.ControlsPerLine = 1
      ClientHeight = 109
      ClientWidth = 64
      TabOrder = 1
      object PieImage: TImage
        Left = 0
        Height = 64
        Top = 23
        Width = 64
        BorderSpacing.CellAlignVertical = ccaCenter
        Constraints.MaxHeight = 64
        Constraints.MaxWidth = 64
        Constraints.MinHeight = 64
        Constraints.MinWidth = 64
      end
    end
  end
  object MainPanel: TPanel
    Left = 0
    Height = 284
    Top = 113
    Width = 615
    Align = alClient
    BevelOuter = bvNone
    ClientHeight = 284
    ClientWidth = 615
    TabOrder = 1
    object ZoomPanel: TPanel
      Left = 0
      Height = 229
      Top = 0
      Width = 50
      Align = alLeft
      BevelOuter = bvNone
      BorderStyle = bsSingle
      ClientHeight = 227
      ClientWidth = 48
      Color = clGray
      Constraints.MinHeight = 30
      Constraints.MinWidth = 30
      ParentColor = False
      TabOrder = 0
      object ZoomImage: TImage
        Left = 0
        Height = 227
        Top = 0
        Width = 48
        Align = alClient
        Constraints.MinHeight = 25
        Constraints.MinWidth = 25
        OnMouseDown = ZoomImageMouseDown
        OnMouseMove = ZoomImageMouseMove
        OnMouseUp = ZoomImageMouseUp
      end
      object BtnCloseZoomBar: TSpeedButton
        Left = 32
        Height = 13
        Hint = 'Close zoom bar'
        Top = 2
        Width = 13
        Anchors = [akTop, akRight]
        Glyph.Data = {
          C2010000424DC20100000000000036000000280000000B0000000B0000000100
          1800000000008C010000130B0000130B00000000000000000000FF00FFFF00FF
          FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF000000FF00
          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00
          0000FF00FFFF00FFFF00FF000000FF00FFFF00FFFF00FF000000FF00FFFF00FF
          FF00FF000000FF00FFFF00FF000000000000000000FF00FF0000000000000000
          00FF00FFFF00FF000000FF00FFFF00FFFF00FF00000000000000000000000000
          0000FF00FFFF00FFFF00FF000000FF00FFFF00FFFF00FFFF00FF000000000000
          000000FF00FFFF00FFFF00FFFF00FF000000FF00FFFF00FFFF00FF0000000000
          00000000000000000000FF00FFFF00FFFF00FF000000FF00FFFF00FF00000000
          0000000000FF00FF000000000000000000FF00FFFF00FF000000FF00FFFF00FF
          FF00FF000000FF00FFFF00FFFF00FF000000FF00FFFF00FFFF00FF000000FF00
          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00
          0000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
          FF00FF000000
        }
        OnClick = BtnCloseZoomBarClick
      end
    end
    object GridPanel: TPanel
      Left = 50
      Height = 229
      Top = 0
      Width = 565
      Align = alClient
      BevelOuter = bvNone
      BorderStyle = bsSingle
      ClientHeight = 227
      ClientWidth = 563
      Color = clGray
      Constraints.MinHeight = 30
      Constraints.MinWidth = 30
      ParentColor = False
      TabOrder = 1
      OnResize = GridPanelResize
      object BlockImage: TImage
        Left = 0
        Height = 227
        Top = 0
        Width = 563
        Align = alClient
        Constraints.MinHeight = 25
        Constraints.MinWidth = 25
        OnMouseDown = BlockImageMouseDown
        OnMouseMove = BlockImageMouseMove
        OnMouseUp = BlockImageMouseUp
        OnMouseWheel = BlockImageMouseWheel
      end
    end
    object BottomPanel: TPanel
      Left = 0
      Height = 50
      Top = 234
      Width = 615
      Align = alBottom
      BevelOuter = bvNone
      ClientHeight = 50
      ClientWidth = 615
      Color = clForm
      ParentColor = False
      TabOrder = 2
      Visible = False
      object DbgLog: TMemo
        Left = 433
        Height = 50
        Hint = 'Debug log'
        Top = 0
        Width = 182
        Align = alRight
        Color = cl3DLight
        OnDblClick = DbgLogDblClick
        ReadOnly = True
        ScrollBars = ssAutoVertical
        TabOrder = 0
      end
      object CommentsMemo: TMemo
        Left = 0
        Height = 50
        Hint = 'Comment lines from the ddrescue mapfile'
        Top = 0
        Width = 428
        Align = alClient
        Color = cl3DLight
        ReadOnly = True
        ScrollBars = ssAutoVertical
        TabOrder = 1
      end
      object BottomHSplitter: TSplitter
        Left = 428
        Height = 50
        Top = 0
        Width = 5
        Align = alRight
        Color = clForm
        ParentColor = False
        ResizeAnchor = akRight
      end
    end
    object MainVSplitter: TSplitter
      Cursor = crVSplit
      Left = 0
      Height = 5
      Top = 229
      Width = 615
      Align = alBottom
      AutoSnap = False
      Color = clForm
      MinSize = 50
      ParentColor = False
      ResizeAnchor = akBottom
      Visible = False
    end
  end
  object StatusBar: TStatusBar
    Left = 0
    Height = 18
    Top = 397
    Width = 615
    Panels = <    
      item
        Text = 'No file opened'
        Width = 100
      end>
    ParentShowHint = False
    SimplePanel = False
    ShowHint = True
  end
  object MainMenu1: TMainMenu
    Left = 80
    Top = 128
    object FileMenu: TMenuItem
      Caption = 'File'
      object miOpenMapfile: TMenuItem
        Caption = 'Open mapfile'
        OnClick = miOpenMapfileClick
      end
      object miOpenDomFile: TMenuItem
        Caption = 'Open domain mapfile'
        Enabled = False
        OnClick = miOpenDomFileClick
      end
      object miCloseMapfile: TMenuItem
        Caption = 'Close mapfile'
        Enabled = False
        OnClick = miCloseMapfileClick
      end
      object saveFormImage: TMenuItem
        Caption = 'Save screenshot'
        OnClick = saveFormImageClick
      end
      object miExit: TMenuItem
        Caption = 'Exit'
        OnClick = miExitClick
      end
    end
    object View1: TMenuItem
      Caption = 'View'
      object miRefresh: TMenuItem
        Caption = 'Refresh now'
        Hint = 'Updates the block view immediately'
        OnClick = miRefreshClick
      end
      object miCenterCurPos: TMenuItem
        AutoCheck = True
        Caption = 'Center on current position'
        Hint = 'Center the block grid on the current rescue position whenever an update is done'
        OnClick = miCenterCurPosClick
      end
      object miZoomBar: TMenuItem
        Caption = 'Show zoom bar'
        Checked = True
        OnClick = miZoomBarClick
      end
      object miShowMemos: TMenuItem
        Caption = 'Show log panel'
        OnClick = miShowMemosClick
      end
    end
    object OptionsMenu: TMenuItem
      Caption = 'Options'
      object miAutorefresh: TMenuItem
        Caption = 'Automatic refresh'
        object miARoff: TMenuItem
          Caption = 'off'
          Checked = True
          GroupIndex = 2
          RadioItem = True
          OnClick = autoParseClick
        end
        object miAR5sec: TMenuItem
          Tag = 5
          Caption = '5 seconds'
          GroupIndex = 2
          RadioItem = True
          OnClick = autoParseClick
        end
        object miAR10sec: TMenuItem
          Tag = 10
          Caption = '10 seconds'
          GroupIndex = 2
          RadioItem = True
          OnClick = autoParseClick
        end
        object miAR30sec: TMenuItem
          Tag = 30
          Caption = '30 seconds'
          GroupIndex = 2
          RadioItem = True
          OnClick = autoParseClick
        end
        object miAR1min: TMenuItem
          Tag = 60
          Caption = '1 minute'
          GroupIndex = 2
          RadioItem = True
          OnClick = autoParseClick
        end
        object miAR2mins: TMenuItem
          Tag = 120
          Caption = '2 minutes'
          GroupIndex = 2
          RadioItem = True
          OnClick = autoParseClick
        end
        object miAR5mins: TMenuItem
          Tag = 300
          Caption = '5 minutes'
          GroupIndex = 2
          RadioItem = True
          OnClick = autoParseClick
        end
      end
      object miGridsize: TMenuItem
        Caption = 'Grid size'
        object mi4px: TMenuItem
          Tag = 4
          Caption = '4 px'
          GroupIndex = 3
          RadioItem = True
          OnClick = setGridSize
        end
        object mi6px: TMenuItem
          Tag = 6
          Caption = '6 px'
          GroupIndex = 3
          RadioItem = True
          OnClick = setGridSize
        end
        object mi8px: TMenuItem
          Tag = 8
          Caption = '8 px'
          Checked = True
          GroupIndex = 3
          RadioItem = True
          OnClick = setGridSize
        end
        object mi10px: TMenuItem
          Tag = 10
          Caption = '10 px'
          GroupIndex = 3
          RadioItem = True
          OnClick = setGridSize
        end
        object mi12px: TMenuItem
          Tag = 12
          Caption = '12 px'
          GroupIndex = 3
          RadioItem = True
          OnClick = setGridSize
        end
        object mi14px: TMenuItem
          Tag = 14
          Caption = '14 px'
          GroupIndex = 3
          RadioItem = True
          OnClick = setGridSize
        end
        object mi16px: TMenuItem
          Tag = 16
          Caption = '16 px'
          GroupIndex = 3
          RadioItem = True
          OnClick = setGridSize
        end
        object mi20px: TMenuItem
          Tag = 20
          Caption = '20 px'
          GroupIndex = 3
          RadioItem = True
          OnClick = setGridSize
        end
        object mi24px: TMenuItem
          Tag = 24
          Caption = '24 px'
          GroupIndex = 3
          RadioItem = True
          OnClick = setGridSize
        end
      end
      object miPrefixes: TMenuItem
        Caption = 'Unit prefixes'
        object miDecimalPrefixes: TMenuItem
          Caption = 'Decimal (SI) prefixes (e.g. 80.06 GB)'
          Checked = True
          GroupIndex = 1
          RadioItem = True
          OnClick = UnitFormatClick
        end
        object miBinaryPrefixes: TMenuItem
          Caption = 'Binary (IEC) prefixes (e.g. 74.56 GiB)'
          GroupIndex = 1
          RadioItem = True
          OnClick = UnitFormatClick
        end
      end
      object miSectSize: TMenuItem
        Caption = 'Device sector size'
        Hint = 'You can manually select the rescue device''s sector size. It is also automatically determined from the log file''s command line, if possible. This settings has minor influences in display.'
        object DS512: TMenuItem
          Tag = 512
          AutoCheck = True
          Caption = 'Default (512 Bytes)'
          Checked = True
          GroupIndex = 1
          RadioItem = True
          OnClick = DSClick
        end
        object DS2048: TMenuItem
          Tag = 2048
          AutoCheck = True
          Caption = 'Optical media (2048 Bytes)'
          GroupIndex = 1
          RadioItem = True
          OnClick = DSClick
        end
        object DS4096: TMenuItem
          Tag = 4096
          AutoCheck = True
          Caption = 'Advanced Format (4096 Bytes)'
          GroupIndex = 1
          RadioItem = True
          OnClick = DSClick
        end
        object DSCustom: TMenuItem
          AutoCheck = True
          Caption = 'Custom...'
          GroupIndex = 1
          RadioItem = True
          OnClick = DSClick
        end
      end
      object miContigDom: TMenuItem
        AutoCheck = True
        Caption = 'Contiguous domain'
        OnClick = miContigDomClick
      end
      object miSettings: TMenuItem
        Caption = 'Settings'
        OnClick = miSettingsClick
      end
    end
    object Extras1: TMenuItem
      Caption = 'Help'
      object miAbout: TMenuItem
        Caption = 'About'
        Hint = 'Shows an information box about the program'
        OnClick = miAboutClick
      end
    end
  end
  object OpenDialog1: TOpenDialog
    Filter = 'All files|*.*'
    Options = [ofReadOnly, ofHideReadOnly, ofPathMustExist, ofFileMustExist, ofEnableSizing]
    Left = 160
    Top = 128
  end
  object updateTimer: TTimer
    Enabled = False
    OnTimer = miRefreshClick
    Left = 240
    Top = 128
  end
  object ApplicationEvents1: TApplicationProperties
    OnShowHint = ApplicationEvents1ShowHint
    Left = 336
    Top = 128
  end
  object SaveDialog1: TSaveDialog
    DefaultExt = '.png'
    Filter = 'Portable network graphics|*.png'
    Options = [ofOverwritePrompt, ofEnableSizing, ofViewDetail]
    Left = 432
    Top = 128
  end
  object RetryTimer: TTimer
    Enabled = False
    Interval = 100
    OnTimer = miRefreshClick
    Left = 240
    Top = 192
  end
end