Ignore:
Timestamp:
Apr 17, 2019, 10:42:18 AM (5 years ago)
Author:
chronos
Message:
  • Modified: Updated Graphics32 library.
File:
1 edited

Legend:

Unmodified
Added
Removed

  • GraphicTest/UMainForm.lfm

    r472 r522  
    11object MainForm: TMainForm
    2   Left = 561
    3   Height = 577
    4   Top = 310
    5   Width = 998
     2  Left = 63
     3  Height = 721
     4  Top = 49
     5  Width = 1248
    66  Caption = 'Graphic test'
    7   ClientHeight = 548
    8   ClientWidth = 998
     7  ClientHeight = 696
     8  ClientWidth = 1248
     9  DesignTimePPI = 120
    910  Menu = MainMenu1
    1011  OnClose = FormClose
    … …  
    1213  OnDestroy = FormDestroy
    1314  OnShow = FormShow
    14   LCLVersion = '1.5'
     15  LCLVersion = '2.0.0.4'
    1516  object PageControl1: TPageControl
    16     Left = 600
    17     Height = 548
     17    Left = 750
     18    Height = 696
    1819    Top = 0
    19     Width = 398
     20    Width = 498
    2021    ActivePage = TabSheet1
    2122    Align = alRight
     23    ParentFont = False
    2224    TabIndex = 0
    2325    TabOrder = 0
    2426    object TabSheet1: TTabSheet
    2527      Caption = 'Description'
    26       ClientHeight = 505
    27       ClientWidth = 392
     28      ClientHeight = 663
     29      ClientWidth = 490
     30      ParentFont = False
    2831      object Memo1: TMemo
    2932        Left = 0
    30         Height = 505
     33        Height = 663
    3134        Top = 0
    32         Width = 392
     35        Width = 490
    3336        Align = alClient
     37        ParentFont = False
    3438        ReadOnly = True
    3539        ScrollBars = ssAutoBoth
    … …  
    4145      ClientHeight = 505
    4246      ClientWidth = 392
     47      ParentFont = False
    4348      inline SynMemo1: TSynMemo
    4449        Cursor = crIBeam
    … …  
    4853        Width = 394
    4954        Align = alClient
    50         Font.Height = -13
     55        Font.Height = -16
    5156        Font.Name = 'Courier New'
    5257        Font.Pitch = fpFixed
    … …  
    5560        ParentFont = False
    5661        TabOrder = 0
    57         Gutter.Width = 57
     62        Gutter.Width = 72
    5863        Gutter.MouseActions = <>
    5964        Highlighter = SynPasSyn1
    … …  
    492497        inline SynLeftGutterPartList1: TSynGutterPartList
    493498          object SynGutterMarks1: TSynGutterMarks
    494             Width = 24
     499            Width = 30
    495500            MouseActions = <>
    496501          end
    497502          object SynGutterLineNumber1: TSynGutterLineNumber
    498             Width = 17
     503            Width = 21
    499504            MouseActions = <>
    500505            MarkupInfo.Background = clBtnFace
    … …  
    506511          end
    507512          object SynGutterChanges1: TSynGutterChanges
    508             Width = 4
     513            Width = 5
    509514            MouseActions = <>
    510515            ModifiedColor = 59900
    … …  
    512517          end
    513518          object SynGutterSeparator1: TSynGutterSeparator
    514             Width = 2
     519            Width = 3
    515520            MouseActions = <>
    516521            MarkupInfo.Background = clWhite
    … …  
    518523          end
    519524          object SynGutterCodeFolding1: TSynGutterCodeFolding
     525            Width = 13
    520526            MouseActions = <>
    521527            MarkupInfo.Background = clNone
    … …  
    530536  object Panel1: TPanel
    531537    Left = 0
    532     Height = 548
     538    Height = 696
    533539    Top = 0
    534     Width = 595
     540    Width = 744
    535541    Align = alClient
    536542    BevelOuter = bvNone
    537     ClientHeight = 548
    538     ClientWidth = 595
     543    ClientHeight = 696
     544    ClientWidth = 744
     545    ParentFont = False
    539546    TabOrder = 1
    540547    object ListViewMethods: TListView
    541       Left = 4
    542       Height = 423
    543       Top = 4
    544       Width = 589
     548      Left = 5
     549      Height = 540
     550      Top = 5
     551      Width = 737
    545552      Anchors = [akTop, akLeft, akRight, akBottom]
    546553      Columns = <     
    547554        item
    548555          Caption = 'Method'
    549           Width = 200
     556          Width = 250
    550557        end     
    551558        item
    552559          Caption = 'FPS'
    553           Width = 75
     560          Width = 94
    554561        end     
    555562        item
    556563          Caption = 'Duration [ms]'
    557           Width = 80
     564          Width = 100
    558565        end     
    559566        item
    560567          Caption = 'Draw FPS'
    561           Width = 75
     568          Width = 94
    562569        end     
    563570        item
    564571          Caption = 'Draw duration [ms]'
    565           Width = 80
     572          Width = 100
    566573        end     
    567574        item
    568575          Caption = 'Step FPS'
    569           Width = 75
     576          Width = 94
    570577        end     
    571578        item
    572579          Caption = 'Step duration [ms]'
    573           Width = 80
     580          Width = 100
    574581        end>
    575582      OwnerData = True
     583      ParentFont = False
    576584      PopupMenu = PopupMenu1
    577585      ReadOnly = True
    … …  
    583591    end
    584592    object ButtonSingleTest: TButton
    585       Left = 232
    586       Height = 32
    587       Top = 468
    588       Width = 160
     593      Left = 290
     594      Height = 40
     595      Top = 596
     596      Width = 200
    589597      Action = ATestOneMethod
    590598      Anchors = [akLeft, akBottom]
     599      ParentFont = False
    591600      TabOrder = 1
    592601    end
    593602    object ButtonBenchmark: TButton
    594       Left = 232
    595       Height = 33
    596       Top = 432
    597       Width = 160
     603      Left = 290
     604      Height = 41
     605      Top = 551
     606      Width = 200
    598607      Action = ATestAllMethods
    599608      Anchors = [akLeft, akBottom]
     609      ParentFont = False
    600610      TabOrder = 2
    601611    end
    602612    object FloatSpinEdit1: TFloatSpinEdit
    603       Left = 152
    604       Height = 35
    605       Top = 472
    606       Width = 58
    607       Anchors = [akLeft, akBottom]
    608       Increment = 1
    609       MaxValue = 100
     613      Left = 190
     614      Height = 28
     615      Top = 617
     616      Width = 72
     617      Anchors = [akLeft, akBottom]
    610618      MinValue = 0
     619      ParentFont = False
    611620      TabOrder = 3
    612621      Value = 1
    613622    end
    614623    object ButtonStop: TButton
    615       Left = 312
    616       Height = 33
    617       Top = 502
    618       Width = 75
     624      Left = 390
     625      Height = 41
     626      Top = 639
     627      Width = 94
    619628      Action = ATestStop
    620629      Anchors = [akLeft, akBottom]
     630      ParentFont = False
    621631      TabOrder = 4
    622632    end
    623633    object Label1: TLabel
    624       Left = 8
    625       Height = 25
    626       Top = 473
    627       Width = 131
     634      Left = 10
     635      Height = 20
     636      Top = 614
     637      Width = 93
    628638      Anchors = [akLeft, akBottom]
    629639      Caption = 'Step duration:'
    630640      ParentColor = False
     641      ParentFont = False
    631642    end
    632643    object Label2: TLabel
    633       Left = 216
    634       Height = 25
    635       Top = 473
    636       Width = 9
     644      Left = 270
     645      Height = 20
     646      Top = 614
     647      Width = 6
    637648      Anchors = [akLeft, akBottom]
    638649      Caption = 's'
    639650      ParentColor = False
     651      ParentFont = False
    640652    end
    641653    object SpinEditWidth: TSpinEdit
    642       Left = 72
    643       Height = 35
    644       Top = 432
    645       Width = 58
     654      Left = 90
     655      Height = 28
     656      Top = 567
     657      Width = 72
    646658      Anchors = [akLeft, akBottom]
    647659      MaxValue = 1000
    648660      OnChange = SpinEditWidthChange
     661      ParentFont = False
    649662      TabOrder = 5
    650663      Value = 320
    651664    end
    652665    object SpinEditHeight: TSpinEdit
    653       Left = 152
    654       Height = 35
    655       Top = 432
    656       Width = 58
     666      Left = 190
     667      Height = 28
     668      Top = 567
     669      Width = 72
    657670      Anchors = [akLeft, akBottom]
    658671      MaxValue = 1000
    659672      OnChange = SpinEditHeightChange
     673      ParentFont = False
    660674      TabOrder = 6
    661675      Value = 240
    662676    end
    663677    object Label3: TLabel
    664       Left = 8
    665       Height = 25
    666       Top = 436
    667       Width = 42
     678      Left = 10
     679      Height = 20
     680      Top = 567
     681      Width = 30
    668682      Anchors = [akLeft, akBottom]
    669683      Caption = 'Size:'
    670684      ParentColor = False
     685      ParentFont = False
    671686    end
    672687    object Label4: TLabel
    673       Left = 136
    674       Height = 25
    675       Top = 442
    676       Width = 10
     688      Left = 170
     689      Height = 20
     690      Top = 575
     691      Width = 7
    677692      Anchors = [akLeft, akBottom]
    678693      Caption = 'x'
    679694      ParentColor = False
     695      ParentFont = False
    680696    end
    681697    object CheckBoxDoubleBuffered: TCheckBox
    682       Left = 400
    683       Height = 27
    684       Top = 436
    685       Width = 174
     698      Left = 500
     699      Height = 24
     700      Top = 566
     701      Width = 134
    686702      Anchors = [akLeft, akBottom]
    687703      Caption = 'Double buffered'
    688704      OnChange = CheckBoxDoubleBufferedChange
     705      ParentFont = False
    689706      TabOrder = 7
    690707    end
    691708    object CheckBoxEraseBackground: TCheckBox
    692       Left = 400
    693       Height = 27
    694       Top = 468
    695       Width = 188
     709      Left = 500
     710      Height = 24
     711      Top = 606
     712      Width = 142
    696713      Anchors = [akLeft, akBottom]
    697714      Caption = 'Erase background'
    698715      OnChange = CheckBoxEraseBackgroundChange
     716      ParentFont = False
    699717      TabOrder = 8
    700718    end
    701719    object CheckBoxOpaque: TCheckBox
    702       Left = 400
    703       Height = 27
    704       Top = 503
    705       Width = 96
     720      Left = 500
     721      Height = 24
     722      Top = 650
     723      Width = 77
    706724      Anchors = [akLeft, akBottom]
    707725      Caption = 'Opaque'
    708726      OnChange = CheckBoxOpaqueChange
     727      ParentFont = False
    709728      TabOrder = 9
    710729    end
    711730    object Label5: TLabel
    712       Left = 8
    713       Height = 25
    714       Top = 510
    715       Width = 118
     731      Left = 10
     732      Height = 20
     733      Top = 660
     734      Width = 83
    716735      Anchors = [akLeft, akBottom]
    717736      Caption = 'Pixel format:'
    718737      ParentColor = False
     738      ParentFont = False
    719739    end
    720740    object ComboBoxPixelFormat: TComboBox
    721       Left = 136
    722       Height = 37
    723       Top = 508
    724       Width = 144
    725       Anchors = [akLeft, akBottom]
    726       ItemHeight = 0
     741      Left = 170
     742      Height = 28
     743      Top = 664
     744      Width = 180
     745      Anchors = [akLeft, akBottom]
     746      ItemHeight = 20
    727747      OnChange = ComboBoxPixelFormatChange
     748      ParentFont = False
    728749      Style = csDropDownList
    729750      TabOrder = 10
    … …  
    731752  end
    732753  object Splitter1: TSplitter
    733     Left = 595
    734     Height = 548
     754    Left = 744
     755    Height = 696
    735756    Top = 0
    736     Width = 5
     757    Width = 6
    737758    Align = alRight
    738759    ResizeAnchor = akRight
    … …  
    742763    CompilerMode = pcmDelphi
    743764    NestedComments = False
    744     left = 649
    745     top = 86
     765    left = 811
     766    top = 108
    746767  end
    747768  object TimerUpdateList: TTimer
    748769    Interval = 500
    749770    OnTimer = TimerUpdateListTimer
    750     left = 266
    751     top = 164
     771    left = 333
     772    top = 205
    752773  end
    753774  object ActionList1: TActionList
    754     left = 104
    755     top = 168
     775    left = 130
     776    top = 210
    756777    object AExportAsWikiText: TAction
    757778      Caption = 'Export as Wiki text'
    … …  
    788809  end
    789810  object MainMenu1: TMainMenu
    790     left = 160
    791     top = 80
     811    left = 200
     812    top = 100
    792813    object MenuItem1: TMenuItem
    793814      Caption = 'General'
    … …  
    820841  object SaveDialog1: TSaveDialog
    821842    DefaultExt = '.txt'
    822     left = 308
    823     top = 76
     843    left = 385
     844    top = 95
    824845  end
    825846  object PopupMenu1: TPopupMenu
    826     left = 401
    827     top = 176
     847    left = 501
     848    top = 220
    828849    object MenuItem9: TMenuItem
    829850      Action = ATestOneMethod
    … …  
    838859  object TimerUpdateSettings: TTimer
    839860    OnTimer = TimerUpdateSettingsTimer
    840     left = 272
    841     top = 264
     861    left = 340
     862    top = 330
    842863  end
    843864end
Note: See TracChangeset for help on using the changeset viewer.