-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy pathastap_main.lfm
More file actions
3442 lines (3442 loc) · 163 KB
/
astap_main.lfm
File metadata and controls
3442 lines (3442 loc) · 163 KB
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
968
969
970
971
972
973
974
975
976
977
978
979
980
981
982
983
984
985
986
987
988
989
990
991
992
993
994
995
996
997
998
999
1000
object mainwindow: Tmainwindow
Left = 304
Height = 646
Hint = ' '
Top = 126
Width = 1272
AllowDropFiles = True
Caption = 'Astrometric Stacking Program and fits viewer (ASTAP)'
ClientHeight = 626
ClientWidth = 1272
Color = clForm
Icon.Data = {
7E03000000000100010010100000010018006803000016000000280000001000
0000200000000100180000000000000300006400000064000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000000000FFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00
0000000000FFFFFF000000000000000000000000000000FFFFFF000000000000
000000000000000000000000FFFFFF000000000000FFFFFF0000000000000000
00000000000000FFFFFF000000000000000000000000000000000000FFFFFF00
0000000000FFFFFF000000000000000000000000000000FFFFFF000000000000
000000000000000000000000FFFFFF000000000000FFFFFF0000000000000000
00000000000000FFFFFF000000000000000000000000000000000000FFFFFF00
0000000000FFFFFF000000000000000000000000000000FFFFFF000000000000
000000000000000000000000FFFFFF000000000000FFFFFF0000000000000000
00000000000000FFFFFF000000000000000000000000000000000000FFFFFF00
0000000000FFFFFF000000000000000000000000000000FFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000FFFFFF0000000000000000
00000000000000000000000000000000000000000000000000000000FFFFFF00
0000000000FFFFFF000000000000000000000000000000000000000000000000
000000000000000000000000FFFFFF000000000000FFFFFF0000000000000000
00000000000000000000000000000000000000000000000000000000FFFFFF00
0000000000FFFFFF000000000000000000000000000000000000000000000000
000000000000000000000000FFFFFF000000000000FFFFFF0000000000000000
00000000000000000000000000000000000000000000000000000000FFFFFF00
0000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000
}
KeyPreview = True
Menu = MainMenu1
OnClose = FormClose
OnCreate = FormCreate
OnDestroy = FormDestroy
OnDropFiles = FormDropFiles
OnKeyPress = FormKeyPress
OnPaint = FormPaint
OnResize = FormResize
OnShow = FormShow
ParentFont = True
Position = poDesktopCenter
LCLVersion = '2.0.12.0'
object Label1: TLabel
Left = 54
Height = 25
Hint = 'Right ascension'
Top = -4
Width = 12
Alignment = taRightJustify
Caption = 'α'
Font.Height = -19
ParentColor = False
ParentFont = False
ParentShowHint = False
ShowHint = True
end
object Label2: TLabel
Left = 54
Height = 25
Hint = 'Declination'
Top = 24
Width = 11
Alignment = taRightJustify
Caption = 'δ'
Font.Height = -19
ParentColor = False
ParentFont = False
ParentShowHint = False
ShowHint = True
end
object error_get_it: TLabel
Left = 217
Height = 15
Top = 159
Width = 18
Caption = ' '
Font.CharSet = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = 'Segoe UI'
Font.Pitch = fpVariable
Font.Quality = fqDraft
ParentColor = False
ParentFont = False
end
object ra_label: TLabel
Left = 176
Height = 15
Top = 6
Width = 12
Caption = '00'
Font.CharSet = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = 'Segoe UI'
Font.Pitch = fpVariable
Font.Quality = fqDraft
ParentColor = False
ParentFont = False
end
object dec_label: TLabel
Left = 176
Height = 15
Top = 30
Width = 12
Caption = '00'
Font.CharSet = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = 'Segoe UI'
Font.Pitch = fpVariable
Font.Quality = fqDraft
ParentColor = False
ParentFont = False
end
object rotation1: TLabel
Left = 531
Height = 15
Hint = 'Orientation of the image north axis, independent of flip settings.'
Top = 130
Width = 6
Caption = '0'
Font.CharSet = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = 'Segoe UI'
Font.Pitch = fpVariable
Font.Quality = fqDraft
ParentColor = False
ParentFont = False
ParentShowHint = False
ShowHint = True
end
object image_north_arrow1: TImage
Left = 475
Height = 49
Hint = 'Long axis is north, small axis is east.'
Top = 116
Width = 49
ParentShowHint = False
ShowHint = True
Transparent = True
end
object ra1: TEdit
Left = 75
Height = 23
Hint = 'Right ascension of reference pixel. Normally in the middle of the image. Format 23 30 00.0 or 23.500. Double click to retrieve position from database'
Top = 0
Width = 95
OnChange = ra1Change
OnDblClick = radec_search1Click
ParentShowHint = False
PopupMenu = PopupMenu_ra_dec1
ShowHint = True
TabOrder = 0
Text = '00 00 00.0'
end
object dec1: TEdit
Left = 75
Height = 23
Hint = 'Declination of reference pixel. Normally in the middle of the image. Format +89 30 00 or 89.500. Double click to retrieve position from database'
Top = 26
Width = 95
OnChange = dec1Change
OnDblClick = radec_search1Click
ParentShowHint = False
PopupMenu = PopupMenu_ra_dec1
ShowHint = True
TabOrder = 1
Text = '+00 00 00.00'
end
object inversemousewheel1: TCheckBox
Left = 456
Height = 19
Hint = 'Inverse zoom action of the mouse wheel.'
Top = 89
Width = 103
Caption = 'Inverse 🖱️ wheel'
Font.CharSet = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = 'Segoe UI'
Font.Pitch = fpVariable
Font.Quality = fqDraft
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 2
end
object Panel1: TPanel
Left = 0
Height = 475
Hint = 'hint'
Top = 176
Width = 1297
Align = alCustom
Anchors = [akTop, akLeft, akRight, akBottom]
ClientHeight = 475
ClientWidth = 1297
Color = 2105376
Font.CharSet = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Pitch = fpVariable
Font.Quality = fqDraft
ParentColor = False
ParentFont = False
ParentShowHint = False
TabOrder = 3
OnMouseMove = Panel1MouseMove
OnMouseWheelDown = Panel1MouseWheelDown
OnMouseWheelUp = Panel1MouseWheelUp
object Image1: TImage
Left = 182
Height = 264
Top = 87
Width = 608
Anchors = []
OnMouseDown = Image1MouseDown
OnMouseEnter = Image1MouseEnter
OnMouseMove = Image1MouseMove
OnMouseUp = Image1MouseUp
OnPaint = Image1Paint
ParentShowHint = False
PopupMenu = PopupMenu1
Stretch = True
Visible = False
end
object Shape_alignment_marker1: TShape
Left = 32
Height = 11
Hint = 'Lock unreliable, check position'
Top = 112
Width = 11
Brush.Style = bsClear
Enabled = False
ParentShowHint = False
Pen.Color = clLime
Pen.Mode = pmNotXor
Pen.Width = 3
Shape = stCircle
ShowHint = True
Visible = False
end
object shape_marker1: TShape
Left = 40
Height = 31
Hint = 'reference 1'
Top = 8
Width = 31
Brush.Style = bsClear
Enabled = False
ParentShowHint = False
Pen.Color = clFuchsia
Pen.Mode = pmNotXor
Pen.Width = 2
ShowHint = True
Visible = False
end
object error_label1: TLabel
Left = 19
Height = 28
Top = 40
Width = 158
Caption = 'Error loading file!!'
Font.Color = clRed
Font.Height = -20
ParentColor = False
ParentFont = False
Visible = False
end
object shape_marker2: TShape
Left = 103
Height = 31
Hint = 'reference 2'
Top = 8
Width = 31
Brush.Style = bsClear
Enabled = False
ParentShowHint = False
Pen.Color = clLime
Pen.Mode = pmNotXor
Pen.Width = 2
ShowHint = True
Visible = False
end
object shape_marker3: TShape
Left = 160
Height = 31
Top = 8
Width = 31
Brush.Style = bsClear
Enabled = False
ParentShowHint = False
Pen.Color = clBlue
Pen.Mode = pmNotXor
Pen.Width = 2
ShowHint = True
Visible = False
end
object shape_paste1: TShape
Left = 216
Height = 31
Top = 8
Width = 31
Brush.Style = bsClear
Enabled = False
ParentShowHint = False
Pen.Color = clBlue
Pen.Mode = pmNotXor
Pen.Width = 2
ShowHint = True
Visible = False
end
object shape_marker4: TShape
Left = 272
Height = 31
Hint = 'Mount'
Top = 8
Width = 31
Brush.Style = bsClear
Enabled = False
ParentShowHint = False
Pen.Color = clGreen
Pen.Mode = pmNotXor
Pen.Width = 2
Shape = stCircle
ShowHint = True
Visible = False
end
object Shape_alignment_marker2: TShape
Left = 32
Height = 11
Hint = 'Lock unreliable, check position'
Top = 144
Width = 11
Brush.Style = bsClear
Enabled = False
ParentShowHint = False
Pen.Color = clLime
Pen.Mode = pmNotXor
Pen.Width = 3
Shape = stDiamond
ShowHint = True
Visible = False
end
object Shape_alignment_marker3: TShape
Left = 32
Height = 11
Hint = 'Lock unreliable, check position'
Top = 176
Width = 11
Brush.Style = bsClear
Enabled = False
ParentShowHint = False
Pen.Color = clLime
Pen.Mode = pmNotXor
Pen.Width = 3
Shape = stDiamond
ShowHint = True
Visible = False
end
object LabelVar1: TLabel
Left = 62
Height = 30
Top = 104
Width = 29
Caption = 'Var'
Font.CharSet = ANSI_CHARSET
Font.Color = clYellow
Font.Height = -21
Font.Pitch = fpVariable
Font.Quality = fqDraft
ParentColor = False
ParentFont = False
Visible = False
end
object LabelCheck1: TLabel
Left = 62
Height = 30
Top = 136
Width = 56
Caption = 'Check'
Font.CharSet = ANSI_CHARSET
Font.Color = clYellow
Font.Height = -21
Font.Pitch = fpVariable
Font.Quality = fqDraft
ParentColor = False
ParentFont = False
Visible = False
end
object LabelThree1: TLabel
Left = 62
Height = 30
Top = 168
Width = 11
Caption = '3'
Font.CharSet = ANSI_CHARSET
Font.Color = clYellow
Font.Height = -21
Font.Pitch = fpVariable
Font.Quality = fqDraft
ParentColor = False
ParentFont = False
Visible = False
end
object shape_manual_alignment1: TShape
Left = 344
Height = 11
Hint = 'Lock unreliable, check position'
Top = 16
Width = 11
Brush.Style = bsClear
Enabled = False
ParentShowHint = False
Pen.Color = clLime
Pen.Mode = pmNotXor
Pen.Width = 3
Shape = stCircle
ShowHint = True
Visible = False
end
end
object GroupBox1: TGroupBox
Left = 304
Height = 51
Hint = ' '
Top = 0
Width = 288
Caption = 'Astrometric solution'
ClientHeight = 31
ClientWidth = 284
Font.CharSet = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = 'Segoe UI'
Font.Pitch = fpVariable
Font.Quality = fqDraft
ParentFont = False
TabOrder = 4
object save1: TButton
Left = 150
Height = 30
Hint = 'Save FITS file with plate solution'
Top = 0
Width = 128
Caption = 'Save new header'
Enabled = False
Font.CharSet = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = 'Segoe UI'
Font.Pitch = fpVariable
Font.Quality = fqDraft
OnClick = SaveFITSwithupdatedheader1Click
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 0
end
object solve_button1: TButton
Left = 8
Height = 30
Hint = 'Find an astrometric solution for the image in the viewer.'#13#10#13#10'Checklist for successful solving:'#13#10#13#10'- At least 30 stars are visible.'#13#10'- Reasonable round stars.'#13#10'- Image dimensions at least 1280x960 pixels.'#13#10'- An approximate position is available for a spiral search'#13#10'- Correct image height in degrees specified. See stack menu tab alignment.'#13#10'- Image is not stretched or heavily photo-shopped.'
Top = 0
Width = 121
Caption = 'Solve'
Enabled = False
Font.CharSet = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = 'Segoe UI'
Font.Pitch = fpVariable
Font.Quality = fqDraft
OnClick = solve_button1Click
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 1
end
end
object data_range_groupBox1: TGroupBox
Left = 8
Height = 120
Hint = ' '
Top = 52
Width = 417
AutoSize = True
Caption = 'Data range'
ClientHeight = 100
ClientWidth = 413
Enabled = False
Font.CharSet = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = 'Segoe UI'
Font.Pitch = fpVariable
Font.Quality = fqDraft
ParentFont = False
TabOrder = 5
object Label12: TLabel
Left = 0
Height = 15
Top = 57
Width = 53
Caption = 'Minimum'
Color = clBtnFace
Font.CharSet = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = 'Segoe UI'
Font.Pitch = fpVariable
Font.Quality = fqDraft
ParentColor = False
ParentFont = False
Transparent = False
end
object Label13: TLabel
Left = 0
Height = 15
Top = 77
Width = 55
Caption = 'Maximum'
Color = clBtnFace
Font.CharSet = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = 'Segoe UI'
Font.Pitch = fpVariable
Font.Quality = fqDraft
ParentColor = False
ParentFont = False
Transparent = False
end
object histogram1: TImage
Cursor = crCross
Left = 93
Height = 54
Top = 0
Width = 210
OnMouseMove = histogram1MouseMove
ParentShowHint = False
PopupMenu = PopupMenu_histogram1
ShowHint = True
StretchOutEnabled = False
StretchInEnabled = False
end
object Label5: TLabel
Left = 4
Height = 15
Top = 8
Width = 59
Caption = 'Histogram:'
Font.CharSet = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = 'Segoe UI'
Font.Pitch = fpVariable
Font.Quality = fqDraft
ParentColor = False
ParentFont = False
end
object minimum1: TScrollBar
Left = 67
Height = 16
Hint = 'Adjust the black level'
Top = 57
Width = 261
Enabled = False
Max = 65535
PageSize = 0
ParentShowHint = False
ShowHint = True
TabOrder = 0
OnChange = minimum1Change
OnScroll = maximum1Scroll
end
object maximum1: TScrollBar
Left = 67
Height = 16
Hint = 'Adjust the white level.'
Top = 80
Width = 261
Enabled = False
LargeChange = 5000
Max = 65535
Min = 1
PageSize = 0
ParentShowHint = False
Position = 65535
ShowHint = True
SmallChange = 1000
TabOrder = 1
OnChange = maximum1Change
OnScroll = maximum1Scroll
end
object min2: TEdit
Left = 340
Height = 23
Hint = 'At this level the pixels are displayed as black.'
Top = 56
Width = 49
Enabled = False
OnEditingDone = min2EditingDone
ParentShowHint = False
ShowHint = True
TabOrder = 2
Text = '0'
end
object max2: TEdit
Left = 340
Height = 23
Hint = 'At this level the pixels are displayed as fully white.'
Top = 77
Width = 49
Enabled = False
OnEditingDone = max2EditingDone
ParentShowHint = False
ShowHint = True
TabOrder = 3
Text = '65535'
end
object range1: TComboBox
Left = 313
Height = 23
Hint = 'Preset of the automatic data range adjustments.'
Top = 27
Width = 100
DropDownCount = 20
Enabled = False
ItemHeight = 15
ItemIndex = 2
Items.Strings = (
'Low'
'Low +'
'Medium'
'Medium +'
'High'
'High +'
'Range'
'Manual'
'Show saturation'
'Max range'
)
OnChange = range1Change
ParentBidiMode = False
ParentColor = True
ParentShowHint = False
ShowHint = True
Style = csDropDownList
TabOrder = 4
Text = 'Medium'
end
object stretch1: TComboBox
Left = 313
Height = 23
Hint = 'Stretch factor applied on displayed image. This is a colour preserving stretch based on an asinh function.'
Top = 0
Width = 100
DropDownCount = 20
Enabled = False
ItemHeight = 15
ItemIndex = 0
Items.Strings = (
'off'
'2'
'4'
'8'
'10'
'15'
'20'
'30'
'40'
'100'
'200'
'400'
'1000'
'2000'
'4000'
'10000'
)
OnChange = stretch1Change
ParentColor = True
ParentShowHint = False
ShowHint = True
TabOrder = 5
Text = 'off'
end
object saturation_factor_plot1: TTrackBar
Left = 392
Height = 48
Hint = 'Saturation adjust factor. The midde position is neutral. Above is increase, below is decrease.'
Top = 52
Width = 20
Frequency = 5
Min = -10
Orientation = trVertical
Position = 0
Enabled = False
Font.CharSet = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Segoe UI'
Font.Pitch = fpVariable
Font.Quality = fqDraft
OnMouseUp = saturation_factor_plot1MouseUp
OnKeyUp = saturation_factor_plot1KeyUp
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 6
end
object shape_histogram1: TShape
Left = 72
Height = 54
Top = 1
Width = 1
Brush.Color = clNone
Brush.Style = bsClear
Pen.Color = clWhite
Pen.Style = psDot
Visible = False
end
end
object Polynomial1: TComboBox
Left = 456
Height = 23
Hint = 'Use WCS, SIP or DSS polynomial for indicating the position. SIP is available for Astrometry.net solutions and DSS polynomial for images from the DSS survey. A red background is indicating "no valid" solution for this option.'
Top = 61
Width = 125
Font.CharSet = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = 'Segoe UI'
Font.Pitch = fpVariable
Font.Quality = fqDraft
ItemHeight = 15
ItemIndex = 0
Items.Strings = (
'WCS'
'SIP Polynomial'
'DSS Polynomial'
)
OnChange = Polynomial1Change
ParentColor = True
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 6
Text = 'WCS'
end
object StatusBar1: TStatusBar
Left = 0
Height = 23
Top = 603
Width = 1272
Panels = <
item
Width = 200
end
item
Width = 200
end
item
Width = 280
end
item
Width = 220
end
item
Width = 170
end
item
Width = 170
end
item
Width = 170
end
item
Width = 170
end
item
Width = 170
end>
ParentShowHint = False
PopupMenu = popupmenu_statusbar1
SimplePanel = False
SizeGrip = False
OnMouseEnter = StatusBar1MouseEnter
end
object BitBtn1: TBitBtn
Left = 248
Height = 42
Hint = 'Show stack menu. CTRL-A'
Top = 5
Width = 48
AutoSize = True
Caption = '∑ '
Font.Height = -24
OnClick = Stackimages1Click
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 8
end
object SpeedButton1: TSpeedButton
Left = 8
Height = 22
Hint = 'Browse & preview fits files'
Top = 8
Width = 23
Font.CharSet = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = 'Segoe UI'
Font.Pitch = fpVariable
Font.Quality = fqDraft
Glyph.Data = {
36050000424D3605000000000000360400002800000010000000100000000100
08000000000000010000C40E0000C40E00000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA
A6000020400000206000002080000020A0000020C0000020E000004000000040
20000040400000406000004080000040A0000040C0000040E000006000000060
20000060400000606000006080000060A0000060C0000060E000008000000080
20000080400000806000008080000080A0000080C0000080E00000A0000000A0
200000A0400000A0600000A0800000A0A00000A0C00000A0E00000C0000000C0
200000C0400000C0600000C0800000C0A00000C0C00000C0E00000E0000000E0
200000E0400000E0600000E0800000E0A00000E0C00000E0E000400000004000
20004000400040006000400080004000A0004000C0004000E000402000004020
20004020400040206000402080004020A0004020C0004020E000404000004040
20004040400040406000404080004040A0004040C0004040E000406000004060
20004060400040606000406080004060A0004060C0004060E000408000004080
20004080400040806000408080004080A0004080C0004080E00040A0000040A0
200040A0400040A0600040A0800040A0A00040A0C00040A0E00040C0000040C0
200040C0400040C0600040C0800040C0A00040C0C00040C0E00040E0000040E0
200040E0400040E0600040E0800040E0A00040E0C00040E0E000800000008000
20008000400080006000800080008000A0008000C0008000E000802000008020
20008020400080206000802080008020A0008020C0008020E000804000008040
20008040400080406000804080008040A0008040C0008040E000806000008060
20008060400080606000806080008060A0008060C0008060E000808000008080
20008080400080806000808080008080A0008080C0008080E00080A0000080A0
200080A0400080A0600080A0800080A0A00080A0C00080A0E00080C0000080C0
200080C0400080C0600080C0800080C0A00080C0C00080C0E00080E0000080E0
200080E0400080E0600080E0800080E0A00080E0C00080E0E000C0000000C000
2000C0004000C0006000C0008000C000A000C000C000C000E000C0200000C020
2000C0204000C0206000C0208000C020A000C020C000C020E000C0400000C040
2000C0404000C0406000C0408000C040A000C040C000C040E000C0600000C060
2000C0604000C0606000C0608000C060A000C060C000C060E000C0800000C080
2000C0804000C0806000C0808000C080A000C080C000C080E000C0A00000C0A0
2000C0A04000C0A06000C0A08000C0A0A000C0A0C000C0A0E000C0C00000C0C0
2000C0C04000C0C06000C0C08000C0C0A000F0FBFF00A4A0A000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
A4FFA4FFFFFFFFFFFFFFFFFFFFFFFFA4FFFFFFA4FFFFFFFFFFFFFFFFFFFFA4FF
FFFFFFFFA4FFFFFFFFFFFFFFFFA4FFFFFFFFFFFFFFA4FFFFFFFFFFFFA4FFFFFF
FFFFFFFFFFFFA4FFFFFFFFA4FFFFFFFFFFFFFFFFFFFFFFA4FFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFA4FFFFFFFFFFFFFFFFFFFFFFA4FFFFFFFFA4FFFFFF
FFFFFFFFFFFFA4FFFFFFFFFFFFA4FFFFFFFFFFFFFFA4FFFFFFFFFFFFFFFFA4FF
FFFFFFFFA4FFFFFFFFFFFFFFFFFFFFA4FFFFFFA4FFFFFFFFFFFFFFFFFFFFFFFF
A4FFA4FFFFFFFFFFFFFFFFFFFFFFFFFFFFA4FFFFFFFFFFFFFFFF
}
OnClick = SpeedButton1Click
ShowHint = True
ParentFont = False
ParentShowHint = False
end
object PageControl1: TPageControl
Left = 595
Height = 177
Top = 0
Width = 680
ActivePage = TabSheet1
Anchors = [akTop, akLeft, akRight]
TabIndex = 0
TabOrder = 9
object TabSheet1: TTabSheet
Caption = 'Header'
ClientHeight = 149
ClientWidth = 672
object Memo1: TMemo
Left = 0
Height = 149
Top = 0
Width = 672
Align = alClient
Anchors = [akTop, akLeft, akRight]
Font.Height = -9
Font.Name = 'Courier'
Lines.Strings = (
''
)
OnChange = Memo1Change
OnKeyUp = Memo1KeyUp
ParentFont = False
PopupMenu = PopupMenu_memo1
ScrollBars = ssVertical
TabOrder = 0
WordWrap = False
end
end
object TabSheet2: TTabSheet
Caption = 'Table'
ClientHeight = 149
ClientWidth = 672
object Memo3: TMemo
Left = 0
Height = 149
Top = 0
Width = 672
Align = alClient
Anchors = [akTop, akLeft, akRight]
Font.Height = -9
Font.Name = 'Courier'
Lines.Strings = (
''
)
OnKeyUp = Memo1KeyUp
ParentFont = False
ScrollBars = ssAutoVertical
TabOrder = 0
WordWrap = False
end
end
end
object UpDown1: TUpDown
Left = 808
Height = 23
Hint = 'Scroll through the images and tables in the FITS extension.'
Top = 0
Width = 47
Min = 0
OnClick = UpDown1Click
Orientation = udHorizontal
ParentShowHint = False
Position = 0
ShowHint = True
TabOrder = 10
Visible = False
end
object MainMenu1: TMainMenu
Images = ImageList1
Left = 856
Top = 207
object File1: TMenuItem
Caption = '&File'
Hint = 'Load a FITS, PNG, JPG or BPM file.'
object LoadFITSPNGBMPJPEG1: TMenuItem
Caption = 'Load FITS or other format'
Hint = 'Load an image file in the viewer '
ImageIndex = 1
ShortCut = 16463
OnClick = LoadFITSPNGBMPJPEG1Click
end
object select_directory_thumb1: TMenuItem
Caption = 'Thumbnail viewer'
Hint = 'Show FITS files as thumnails'
ShortCut = 16468
OnClick = select_directory_thumb1Click
end
object MenuItem6: TMenuItem
Caption = 'Open recent'
Hint = 'Open recent files'
object recent1: TMenuItem
Caption = '1'
ShortCut = 16433
Visible = False
OnClick = recent1Click
end
object recent2: TMenuItem
Caption = '2'
ShortCut = 16434
Visible = False
OnClick = recent1Click
end
object recent3: TMenuItem
Caption = '3'
ShortCut = 16435
Visible = False
OnClick = recent1Click
end
object recent4: TMenuItem
Caption = '4'
ShortCut = 16436
Visible = False
OnClick = recent1Click
end