⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 dbserverclientunit.dfm

📁 Delphi 7组件与分布式应用开发源码,介绍了基础的组件应用实例
💻 DFM
字号:
object ClientForm: TClientForm
  Left = 293
  Top = 216
  Width = 625
  Height = 336
  Caption = 'WebServices DB Client'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 17
    Top = 20
    Width = 96
    Height = 16
    HelpType = htKeyword
    AutoSize = False
    Caption = #36755#20837'SQL'#35821#21477
    FocusControl = Edit1
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Edit1: TEdit
    Left = 127
    Top = 19
    Width = 256
    Height = 21
    ImeName = #32043#20809#25340#38899#36755#20837#27861
    TabOrder = 0
    Text = 'select * from EMPLOYEE'
    OnKeyPress = Edit1KeyPress
  end
  object DBGrid1: TDBGrid
    Left = 14
    Top = 73
    Width = 565
    Height = 207
    DataSource = DataSource1
    ImeName = #32043#20809#25340#38899#36755#20837#27861
    TabOrder = 1
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
  end
  object Button3: TButton
    Left = 408
    Top = 19
    Width = 75
    Height = 25
    Caption = #30830#35748#20462#25913
    TabOrder = 2
    OnClick = Button3Click
  end
  object DBNavigator1: TDBNavigator
    Left = 15
    Top = 46
    Width = 252
    Height = 20
    DataSource = DataSource1
    VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbInsert, nbDelete, nbEdit, nbPost, nbCancel]
    TabOrder = 3
  end
  object ClientDataSet1: TClientDataSet
    Aggregates = <>
    FieldDefs = <>
    IndexDefs = <>
    Params = <>
    StoreDefs = True
    AfterInsert = ClientDataSet1AfterInsert
    AfterEdit = ClientDataSet1AfterEdit
    AfterPost = ClientDataSet1AfterPost
    AfterDelete = ClientDataSet1AfterDelete
    Left = 496
    Top = 16
  end
  object DataSource1: TDataSource
    DataSet = ClientDataSet1
    Left = 536
    Top = 16
  end
end

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -