Ignore:
Timestamp:
Dec 31, 2024, 1:15:01 PM (7 days ago)
Author:
chronos
Message:
  • Added: Close button on more forms for better touch screen devices support.
File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/Forms/FormHelp.lfm

    r317 r362  
    11object FormHelp: TFormHelp
    2   Left = 1040
    3   Height = 432
    4   Top = 540
    5   Width = 582
     2  Left = 514
     3  Height = 360
     4  Top = 267
     5  Width = 485
    66  Caption = 'Help'
    7   ClientHeight = 432
    8   ClientWidth = 582
    9   Constraints.MinHeight = 268
    10   Constraints.MinWidth = 509
    11   DesignTimePPI = 144
     7  ClientHeight = 360
     8  ClientWidth = 485
     9  Constraints.MinHeight = 100
     10  Constraints.MinWidth = 100
     11  DesignTimePPI = 120
    1212  OnCreate = FormCreate
    1313  Position = poMainFormCenter
    14   LCLVersion = '3.4.0.0'
     14  LCLVersion = '3.6.0.0'
    1515  object Memo1: TMemo
    16     Left = 7
    17     Height = 418
    18     Top = 7
    19     Width = 568
    20     Align = alClient
    21     BorderSpacing.Around = 7
     16    Left = 8
     17    Height = 304
     18    Top = 8
     19    Width = 469
     20    Align = alTop
     21    Anchors = [akTop, akLeft, akRight, akBottom]
     22    BorderSpacing.Around = 8
    2223    ReadOnly = True
    2324    ScrollBars = ssAutoBoth
    2425    TabOrder = 0
    2526  end
     27  object ButtonClose: TButton
     28    Left = 383
     29    Height = 31
     30    Top = 320
     31    Width = 94
     32    Anchors = [akRight, akBottom]
     33    Caption = 'Close'
     34    ModalResult = 11
     35    TabOrder = 1
     36  end
    2637end
Note: See TracChangeset for help on using the changeset viewer.