unit1.dfm

Detect USB flash disk

object Form1: TForm1
  Left = 172
  Top = 126
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'D'#233'tecter la connection et la  d'#233'connection  USB'
  ClientHeight = 244
  ClientWidth = 398
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object LMDSimpleLabel1: TLMDSimpleLabel
    Left = 8
    Top = 8
    Width = 273
    Height = 42
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    Font3D.LightColor = clWhite
    Font3D.Style = tdRaised
    MultiLine = True
    ParentFont = False
    Caption = 
      'Detecter la Connection/D'#233'connection de p'#233'riph'#233'riques  de stockag' +
      'e USB "STORAGE" : M'#233'm FLASH, HDD , M'#233'm app photo , MP3...'
    Options = []
  end
  object ComLed1: TComLed
    Left = 304
    Top = 24
    Width = 25
    Height = 25
    LedSignal = lsConn
    Kind = lkRedLight
    State = lsOn
  end
  object Memo1: TMemo
    Left = 3
    Top = 59
    Width = 390
    Height = 118
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    ReadOnly = True
    TabOrder = 0
  end
  object Button1: TButton
    Left = 306
    Top = 200
    Width = 75
    Height = 25
    Caption = 'Sauvegarder'
    TabOrder = 1
  end
  object Edit1: TEdit
    Left = 288
    Top = 8
    Width = 97
    Height = 21
    TabOrder = 2
    Visible = False
  end
end