行业应用

开发平台：

Delphi

Tri.dfm：源码内容

							object Triage: TTriage
  Left = 0
  Top = 0
  BorderStyle = bsSingle
  Caption = 'Tri'
  ClientHeight = 55
  ClientWidth = 627
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  PixelsPerInch = 96
  TextHeight = 13
  object TriBox: TRadioGroup
    Left = 5
    Top = 5
    Width = 617
    Height = 44
    Caption = ' Tri par '
    Columns = 4
    Items.Strings = (
      'Id'
      'N'#176' Client'
      'Nom'
      'Pr'#233'nom')
    TabOrder = 0
    OnClick = TriBoxClick
  end
end

						