home *** CD-ROM | disk | FTP | other *** search
/ PC World 2002 May / PCWorld_2002-05_cd.bin / Software / Vyzkuste / exifreader / ExifRead.exe / 0 / RCDATA / TFORM1 / TFORM1.txt < prev   
Encoding:
Text File  |  2002-02-01  |  14.4 KB  |  590 lines

  1. object Form1: TForm1
  2.   Left = 187
  3.   Top = 22
  4.   Width = 634
  5.   Height = 450
  6.   Caption = 'ExifReader'
  7.   Color = clBtnFace
  8.   ParentFont = True
  9.   Icon.Data = {<image000.ico>}
  10.   Menu = MainMenu1
  11.   OldCreateOrder = False
  12.   OnCreate = FormCreate
  13.   OnDestroy = FormDestroy
  14.   PixelsPerInch = 96
  15.   TextHeight = 12
  16.   object Bevel1: TBevel
  17.     Left = 181
  18.     Top = 29
  19.     Width = 3
  20.     Height = 375
  21.     Align = alLeft
  22.     Shape = bsSpacer
  23.     Style = bsRaised
  24.   end
  25.   object ScrollBox1: TScrollBox
  26.     Left = 184
  27.     Top = 29
  28.     Width = 442
  29.     Height = 375
  30.     HorzScrollBar.Tracking = True
  31.     VertScrollBar.Tracking = True
  32.     Align = alClient
  33.     Color = 16185078
  34.     ParentColor = False
  35.     TabOrder = 5
  36.     Visible = False
  37.     object JPEGImage2: TImage
  38.       Left = 0
  39.       Top = 0
  40.       Width = 185
  41.       Height = 145
  42.       IncrementalDisplay = True
  43.       Stretch = True
  44.       OnMouseDown = JPEGImage2MouseDown
  45.       OnMouseMove = JPEGImage2MouseMove
  46.       OnMouseUp = JPEGImage2MouseUp
  47.     end
  48.     object Memo2: TMemo
  49.       Left = 32
  50.       Top = 88
  51.       Width = 233
  52.       Height = 185
  53.       Lines.Strings = (
  54.         'Memo2')
  55.       TabOrder = 0
  56.       Visible = False
  57.       WordWrap = False
  58.     end
  59.   end
  60.   object InfoListView: TListView
  61.     Left = 184
  62.     Top = 29
  63.     Width = 442
  64.     Height = 375
  65.     Align = alClient
  66.     Columns = <
  67.       item
  68.         Caption = '∩┐╜∩┐╜∩┐╜┌û∩┐╜'
  69.         Width = 140
  70.       end
  71.       item
  72.         AutoSize = True
  73.         Caption = '∩┐╜∩┐╜∩┐╜'
  74.       end>
  75.     HideSelection = False
  76.     MultiSelect = True
  77.     ReadOnly = True
  78.     RowSelect = True
  79.     PopupMenu = PopupMenu2
  80.     TabOrder = 3
  81.     ViewStyle = vsReport
  82.     OnClick = InfoListViewClick
  83.     OnCustomDrawItem = InfoListViewCustomDrawItem
  84.   end
  85.   object Edit1: TEdit
  86.     Left = 616
  87.     Top = 5
  88.     Width = 17
  89.     Height = 20
  90.     TabOrder = 0
  91.     Visible = False
  92.   end
  93.   object Button2: TButton
  94.     Left = 504
  95.     Top = 8
  96.     Width = 64
  97.     Height = 17
  98.     Caption = '∩┐╜∩┐╜∩┐╜'
  99.     TabOrder = 1
  100.     Visible = False
  101.   end
  102.   object Panel1: TPanel
  103.     Left = 0
  104.     Top = 0
  105.     Width = 626
  106.     Height = 29
  107.     Align = alTop
  108.     BevelOuter = bvNone
  109.     TabOrder = 2
  110.     object Bevel4: TBevel
  111.       Left = 0
  112.       Top = 0
  113.       Width = 626
  114.       Height = 3
  115.       Align = alTop
  116.       Shape = bsTopLine
  117.     end
  118.     object Bevel3: TBevel
  119.       Left = 90
  120.       Top = 3
  121.       Width = 9
  122.       Height = 24
  123.       Shape = bsLeftLine
  124.     end
  125.     object SpeedButton1: TSpeedButton
  126.       Left = 2
  127.       Top = 3
  128.       Width = 87
  129.       Height = 25
  130.       BiDiMode = bdLeftToRight
  131.       Caption = '∩┐╜J∩┐╜∩┐╜'
  132.       Flat = True
  133.       Glyph.Data = {
  134.         DE000000424DDE000000000000007600000028000000100000000D0000000100
  135.         0400000000006800000000000000000000001000000010000000000000000000
  136.         80000080000000808000800000008000800080800000C0C0C000808080000000
  137.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777770007777
  138.         7777777700FB007777777770F0BFBF007777770B00FBFBFB007770F0F0BFBFBF
  139.         BF000B0FF0FBFBFBFBF000FFF00FBFBFBFB07000FFF00BFBFBF070BF00FF0FBF
  140.         BFB0770BFB0FF00BFBF077700FB0FF000FB07777700700FB0000777777777700
  141.         7777}
  142.       ParentBiDiMode = False
  143.       Spacing = 10
  144.       OnClick = Open1Click
  145.     end
  146.     object Label3: TLabel
  147.       Left = 101
  148.       Top = 11
  149.       Width = 428
  150.       Height = 12
  151.       Anchors = [akLeft, akTop, akRight]
  152.       AutoSize = False
  153.     end
  154.     object Edit2: TEdit
  155.       Left = 392
  156.       Top = 5
  157.       Width = 17
  158.       Height = 20
  159.       TabOrder = 0
  160.       Visible = False
  161.     end
  162.     object Button1: TButton
  163.       Left = 240
  164.       Top = 8
  165.       Width = 64
  166.       Height = 17
  167.       Caption = '∩┐╜∩┐╜∩┐╜'
  168.       TabOrder = 1
  169.       Visible = False
  170.       OnClick = Button2Click
  171.     end
  172.     object Panel4: TPanel
  173.       Left = 514
  174.       Top = 3
  175.       Width = 112
  176.       Height = 26
  177.       Align = alRight
  178.       BevelOuter = bvNone
  179.       TabOrder = 2
  180.       object ToolbarButton974: TToolbarButton97
  181.         Left = 10
  182.         Top = 1
  183.         Width = 23
  184.         Height = 22
  185.         Caption = '<'
  186.         OnClick = ToolbarButton974Click
  187.       end
  188.       object Label4: TLabel
  189.         Left = 36
  190.         Top = 7
  191.         Width = 38
  192.         Height = 16
  193.         Alignment = taCenter
  194.         AutoSize = False
  195.         Caption = '1/1'
  196.       end
  197.       object ToolbarButton973: TToolbarButton97
  198.         Left = 76
  199.         Top = 1
  200.         Width = 23
  201.         Height = 22
  202.         Caption = '>'
  203.         OnClick = ToolbarButton973Click
  204.       end
  205.     end
  206.   end
  207.   object Panel2: TPanel
  208.     Left = 0
  209.     Top = 29
  210.     Width = 181
  211.     Height = 375
  212.     Align = alLeft
  213.     BevelInner = bvRaised
  214.     BevelOuter = bvLowered
  215.     TabOrder = 4
  216.     object Shape1: TShape
  217.       Left = 9
  218.       Top = 38
  219.       Width = 162
  220.       Height = 122
  221.       Brush.Style = bsClear
  222.     end
  223.     object Label2: TLabel
  224.       Left = 5
  225.       Top = 8
  226.       Width = 167
  227.       Height = 20
  228.       AutoSize = False
  229.       Caption = '∩┐╜@∩┐╜T∩┐╜∩┐╜∩┐╜l∩┐╜C∩┐╜∩┐╜'
  230.       Color = 14679295
  231.       ParentColor = False
  232.       Layout = tlCenter
  233.     end
  234.     object ToolbarButton971: TToolbarButton97
  235.       Left = 121
  236.       Top = 164
  237.       Width = 25
  238.       Height = 26
  239.       Hint = '∩┐╜T∩┐╜∩┐╜∩┐╜l∩┐╜C∩┐╜∩┐╜∩┐╜█æ∩┐╜'
  240.       Enabled = False
  241.       Glyph.Data = {
  242.         F6000000424DF600000000000000760000002800000010000000100000000100
  243.         0400000000008000000000000000000000001000000010000000000000000000
  244.         80000080000000808000800000008000800080800000C0C0C000808080000000
  245.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00788888888888
  246.         8888000000000000000807770770880707080777077088070708077707708807
  247.         0708077700000000070807777777777777080700000000000708070FFFFFFFFF
  248.         0708070FFFFFFFFF0708070FFFFFFFFF0708070FFFFFFFFF0708070FFFFFFFFF
  249.         0708070FFFFFFFFF0008070FFFFFFFFF0F087000000000000007}
  250.       ParentShowHint = False
  251.       ShowHint = True
  252.       OnClick = SpeedButton2Click
  253.     end
  254.     object ToolbarButton972: TToolbarButton97
  255.       Left = 147
  256.       Top = 164
  257.       Width = 25
  258.       Height = 26
  259.       Hint = '∩┐╜g∩┐╜∩┐╜\∩┐╜∩┐╜'
  260.       AllowAllUp = True
  261.       Enabled = False
  262.       Glyph.Data = {
  263.         F6000000424DF600000000000000760000002800000010000000100000000100
  264.         0400000000008000000000000000000000001000000010000000000000000000
  265.         80000080000000808000800000008000800080800000C0C0C000808080000000
  266.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
  267.         7777777777777777777770000000000000770777777777777707070000000000
  268.         0707070EFEFEFEFE0707070F8888888F0707070EFEFEFEFE0707070F8888888F
  269.         0707070EFEFEFEFE0707070F888FEFEF0707070EFEFEFEFE0707070000000000
  270.         0707077777777777770770000000000000777777777777777777}
  271.       ParentShowHint = False
  272.       Repeating = True
  273.       ShowHint = True
  274.       OnClick = ToolbarButton972Click
  275.     end
  276.     object ToolbarButton975: TToolbarButton97
  277.       Left = 147
  278.       Top = 192
  279.       Width = 25
  280.       Height = 24
  281.       Hint = '∩┐╜╚ê╒ô∩┐╜∩┐╜∩┐╜─É∩┐╜'
  282.       Enabled = False
  283.       Glyph.Data = {
  284.         F6000000424DF600000000000000760000002800000010000000100000000100
  285.         0400000000008000000000000000000000001000000010000000000000000000
  286.         80000080000000808000800000008000800080800000C0C0C000808080000000
  287.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
  288.         77777777744444444447777774FFFFFFFF47777774FFFFFFFF47777774FFFFFF
  289.         FF477744444444444447774FF4F444444447774FF44444444447774FFFFFFFF4
  290.         777744444444444477774F4F4444444477774F444444444477774FFFFFFFF477
  291.         777744444444447777774F444444447777774444444444777777}
  292.       ParentShowHint = False
  293.       ShowHint = True
  294.       Visible = False
  295.     end
  296.     object JPEGImage1: TImage
  297.       Left = 10
  298.       Top = 39
  299.       Width = 160
  300.       Height = 120
  301.     end
  302.     object Panel3: TPanel
  303.       Left = 9
  304.       Top = 225
  305.       Width = 164
  306.       Height = 141
  307.       Anchors = [akLeft, akTop, akBottom]
  308.       BevelInner = bvSpace
  309.       BevelOuter = bvLowered
  310.       TabOrder = 0
  311.       object Memo1: TMemo
  312.         Left = 6
  313.         Top = 4
  314.         Width = 153
  315.         Height = 131
  316.         Anchors = [akLeft, akTop, akBottom]
  317.         BorderStyle = bsNone
  318.         Color = clBtnFace
  319.         ReadOnly = True
  320.         TabOrder = 0
  321.       end
  322.     end
  323.     object TrackBar1: TTrackBar
  324.       Left = 9
  325.       Top = 168
  326.       Width = 108
  327.       Height = 22
  328.       Ctl3D = True
  329.       Max = 200
  330.       Min = 20
  331.       Orientation = trHorizontal
  332.       ParentCtl3D = False
  333.       PageSize = 20
  334.       Frequency = 20
  335.       Position = 100
  336.       SelEnd = 0
  337.       SelStart = 0
  338.       TabOrder = 1
  339.       ThumbLength = 10
  340.       TickMarks = tmBottomRight
  341.       TickStyle = tsAuto
  342.       Visible = False
  343.       OnChange = TrackBar1Change
  344.     end
  345.     object Button3: TButton
  346.       Left = 8
  347.       Top = 344
  348.       Width = 107
  349.       Height = 57
  350.       Caption = 'English'
  351.       TabOrder = 2
  352.       Visible = False
  353.       OnClick = Button3Click
  354.     end
  355.     object Button4: TButton
  356.       Left = 80
  357.       Top = 360
  358.       Width = 75
  359.       Height = 41
  360.       Caption = 'Button4'
  361.       TabOrder = 3
  362.       Visible = False
  363.       OnClick = Button4Click
  364.     end
  365.     object Kodac_Tag: TMemo
  366.       Left = 8
  367.       Top = 424
  368.       Width = 161
  369.       Height = 81
  370.       Lines.Strings = (
  371.         '8'
  372.         '∩┐╜x∩┐╜∩┐╜∩┐╜_∩┐╜[∩┐╜∩┐╜'
  373.         'string'
  374.         '40'
  375.         '∩┐╜∩┐╜∩┐╜i∩┐╜∩┐╜'
  376.         'string'
  377.         '128'
  378.         '∩┐╜µæ£∩┐╜t∩┐╜@∩┐╜C∩┐╜∩┐╜∩┐╜^∩┐╜C∩┐╜v'
  379.         'fname'
  380.         '832'
  381.         '∩┐╜∩┐╜∩┐╜[∩┐╜U∩┐╜[∩┐╜∩┐╜∩┐╜∩┐╜∩┐╜∩┐╜P'
  382.         'string'
  383.         '868'
  384.         '∩┐╜∩┐╜∩┐╜[∩┐╜U∩┐╜[∩┐╜∩┐╜∩┐╜∩┐╜∩┐╜∩┐╜Q'
  385.         'string')
  386.       TabOrder = 4
  387.       Visible = False
  388.       WordWrap = False
  389.     end
  390.     object Panel5: TPanel
  391.       Left = 6
  392.       Top = 202
  393.       Width = 168
  394.       Height = 19
  395.       BevelOuter = bvNone
  396.       Color = 14679295
  397.       TabOrder = 5
  398.       object Edit3: TEdit
  399.         Left = 3
  400.         Top = 4
  401.         Width = 319
  402.         Height = 18
  403.         BiDiMode = bdLeftToRight
  404.         BorderStyle = bsNone
  405.         Color = 14679295
  406.         ParentBiDiMode = False
  407.         ReadOnly = True
  408.         TabOrder = 0
  409.         Text = ' ∩┐╜∩┐╜∩┐╜┌û∩┐╜'
  410.       end
  411.     end
  412.   end
  413.   object OpenDialog1: TOpenDialog
  414.     DefaultExt = '*.jpg;*.jpeg'
  415.     Filter = 
  416.       'Exif Files (*.jpg,*.tif)|*.jpeg;*.jpg;*.tiff;*.tif|Exif JPEG (*.' +
  417.       'jpg,*.jpeg)|*.jpeg;*.jpg|Exif TIFF (*.tif,*.tiff)|*.tiff;*.tif|C' +
  418.       'CDRAW (*.nef,*.orf)|*.nef;*.orf'
  419.     Options = [ofHideReadOnly, ofAllowMultiSelect, ofEnableSizing]
  420.     Title = 'Open Exif'
  421.     Left = 232
  422.     Top = 88
  423.   end
  424.   object MainMenu1: TMainMenu
  425.     Left = 432
  426.     Top = 280
  427.     object File1: TMenuItem
  428.       Caption = '∩┐╜t∩┐╜@∩┐╜C∩┐╜∩┐╜(&F)'
  429.       object Open1: TMenuItem
  430.         Caption = '∩┐╜J∩┐╜∩┐╜(&O)...'
  431.         ShortCut = 16463
  432.         OnClick = Open1Click
  433.       end
  434.       object N2: TMenuItem
  435.         Caption = '-'
  436.       end
  437.       object N8: TMenuItem
  438.         Caption = '∩┐╜O∩┐╜╠ât∩┐╜@∩┐╜C∩┐╜∩┐╜'
  439.         OnClick = ToolbarButton974Click
  440.       end
  441.       object N9: TMenuItem
  442.         Caption = '∩┐╜∩┐╜∩┐╜╠ât∩┐╜@∩┐╜C∩┐╜∩┐╜'
  443.         OnClick = ToolbarButton973Click
  444.       end
  445.       object Print1: TMenuItem
  446.         Caption = '∩┐╜∩┐╜∩┐╜(&P)...'
  447.         Visible = False
  448.       end
  449.       object PrintSetup1: TMenuItem
  450.         Caption = '∩┐╜y∩┐╜[∩┐╜W∩┐╜▌Æ∩┐╜(&R)...'
  451.         Visible = False
  452.       end
  453.       object N1: TMenuItem
  454.         Caption = '-'
  455.       end
  456.       object Exit1: TMenuItem
  457.         Caption = '∩┐╜I∩┐╜∩┐╜(&X)'
  458.         ShortCut = 16465
  459.         OnClick = Exit1Click
  460.       end
  461.     end
  462.     object Show1: TMenuItem
  463.       Caption = '∩┐╜∩┐╜∩┐╜(&I)'
  464.       object Copy1: TMenuItem
  465.         Caption = '∩┐╜I∩┐╜∩┐╜∩┐╜∩┐╜∩┐╜┌é∩┐╜∩┐╜R∩┐╜s∩┐╜['
  466.         OnClick = N10Click
  467.       end
  468.       object N7: TMenuItem
  469.         Caption = '∩┐╜∩┐╜∩┐╜╫é─âR∩┐╜s∩┐╜['
  470.         OnClick = N7Click
  471.       end
  472.       object N11: TMenuItem
  473.         Caption = '-'
  474.       end
  475.       object N12: TMenuItem
  476.         Caption = '∩┐╜∩┐╜∩┐╜┌û∩┐╜∩┐╜╠é▌é∩┐╜∩┐╜╫é─âR∩┐╜s∩┐╜['
  477.         OnClick = N12Click
  478.       end
  479.       object N13: TMenuItem
  480.         Caption = '∩┐╜∩┐╜∩┐╜╠é▌é∩┐╜∩┐╜╫é─âR∩┐╜s∩┐╜['
  481.         OnClick = N13Click
  482.       end
  483.       object N6: TMenuItem
  484.         Caption = '-'
  485.       end
  486.       object CSV2: TMenuItem
  487.         Caption = 'CSV∩┐╜`∩┐╜∩┐╜∩┐╜┼ò█æ∩┐╜'
  488.         OnClick = CSV2Click
  489.       end
  490.       object HTML1: TMenuItem
  491.         Caption = '∩┐╜∩┐╜∩┐╜∩┐╜HTML∩┐╜`∩┐╜∩┐╜∩┐╜┼ò█æ∩┐╜'
  492.         Visible = False
  493.       end
  494.       object N5: TMenuItem
  495.         Caption = '∩┐╜T∩┐╜∩┐╜∩┐╜l∩┐╜C∩┐╜∩┐╜∩┐╜╠ò█æ∩┐╜(&T)'
  496.         ShortCut = 16468
  497.         OnClick = SpeedButton2Click
  498.       end
  499.       object P1: TMenuItem
  500.         Caption = '∩┐╜╚ê╒ô∩┐╜∩┐╜∩┐╜─É∩┐╜(&P)'
  501.         Enabled = False
  502.       end
  503.       object ShowMap: TMenuItem
  504.         Caption = '∩┐╜}∩┐╜s∩┐╜I∩┐╜∩┐╜∩┐╜┼Æn∩┐╜}∩┐╜╠ò\∩┐╜∩┐╜(&M)'
  505.         Enabled = False
  506.         GroupIndex = 1
  507.         OnClick = ShowMapClick
  508.       end
  509.       object N4: TMenuItem
  510.         Caption = '-'
  511.         GroupIndex = 1
  512.       end
  513.       object ShowAll: TMenuItem
  514.         Caption = '∩┐╜∩┐╜∩┐╜╫é─ò\∩┐╜∩┐╜'
  515.         Checked = True
  516.         GroupIndex = 1
  517.         RadioItem = True
  518.         OnClick = ShowAllClick
  519.       end
  520.       object ShowMin: TMenuItem
  521.         Caption = '∩┐╜╚ù∩┐╜∩┐╜\∩┐╜∩┐╜'
  522.         GroupIndex = 1
  523.         RadioItem = True
  524.         OnClick = ShowMinClick
  525.       end
  526.       object N14: TMenuItem
  527.         Caption = '-'
  528.         GroupIndex = 1
  529.       end
  530.       object N3: TMenuItem
  531.         Caption = '∩┐╜∩┐╜∩┐╜∩┐╜F∩┐╜∩┐╜∩┐╜∩┐╜'
  532.         Checked = True
  533.         GroupIndex = 1
  534.         OnClick = N3Click
  535.       end
  536.     end
  537.     object Help1: TMenuItem
  538.       Caption = '∩┐╜w∩┐╜∩┐╜∩┐╜v(&H)'
  539.       object Contents1: TMenuItem
  540.         Caption = '∩┐╜┌Ä∩┐╜(&C)'
  541.         ShortCut = 112
  542.         Visible = False
  543.       end
  544.       object SearchforHelpOn1: TMenuItem
  545.         Caption = '∩┐╜g∩┐╜s∩┐╜b∩┐╜N∩┐╜╠î∩┐╜∩┐╜∩┐╜(&S)...'
  546.         Visible = False
  547.       end
  548.       object HowtoUseHelp1: TMenuItem
  549.         Caption = '∩┐╜w∩┐╜∩┐╜∩┐╜v∩┐╜╠Äg∩┐╜∩┐╜∩┐╜∩┐╜(&H)'
  550.         Visible = False
  551.       end
  552.       object About1: TMenuItem
  553.         Caption = '∩┐╜o∩┐╜[∩┐╜W∩┐╜∩┐╜∩┐╜∩┐╜∩┐╜∩┐╜∩┐╜(&A)...'
  554.         OnClick = About1Click
  555.       end
  556.     end
  557.   end
  558.   object SaveDialog1: TSaveDialog
  559.     DefaultExt = '*.jpg'
  560.     Filter = 'JPEG (*.jpg)|*.jpg'
  561.     Title = 'Save Thumbnail'
  562.     Left = 256
  563.     Top = 127
  564.   end
  565.   object PopupMenu2: TPopupMenu
  566.     Left = 274
  567.     Top = 151
  568.     object N10: TMenuItem
  569.       Caption = '∩┐╜R∩┐╜s∩┐╜['
  570.       ShortCut = 16451
  571.       OnClick = N10Click
  572.     end
  573.     object HTML2: TMenuItem
  574.       Caption = 'HTML'
  575.       Visible = False
  576.     end
  577.   end
  578.   object SaveDialog2: TSaveDialog
  579.     DefaultExt = '*.txt'
  580.     Filter = 'Text (*.txt)|*.txt|CSV (*.csv)|*.csv'
  581.     Title = 'Save CSV'
  582.     Left = 304
  583.     Top = 127
  584.   end
  585.   object ActionList1: TActionList
  586.     Left = 138
  587.     Top = 351
  588.   end
  589. end
  590.