uecran.~dfm

this application can Paint_Into_Desktop

object Ecran: TEcran
  Left = 476
  Top = 458
  Width = 520
  Height = 346
  Caption = 'Acc'#232's '#233'cran   (www.unvrai.com)'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnActivate = FormActivate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 13
  object ButtonLigne: TButton
    Left = 32
    Top = 36
    Width = 75
    Height = 25
    Caption = 'Ligne'
    TabOrder = 0
    OnClick = ButtonLigneClick
  end
  object ButtonCopie: TButton
    Left = 32
    Top = 108
    Width = 75
    Height = 25
    Caption = 'Copie'
    TabOrder = 1
    OnClick = ButtonCopieClick
  end
  object ButtonZoom: TButton
    Left = 32
    Top = 200
    Width = 75
    Height = 25
    Caption = 'Zoom'
    TabOrder = 2
    OnClick = ButtonZoomClick
  end
  object Panel1: TPanel
    Left = 256
    Top = 28
    Width = 201
    Height = 189
    TabOrder = 3
    object Im: TImage
      Left = 1
      Top = 1
      Width = 199
      Height = 187
      Align = alClient
    end
  end
  object TB: TTrackBar
    Left = 284
    Top = 256
    Width = 150
    Height = 45
    Max = 200
    Min = 5
    Position = 20
    TabOrder = 4
    TickMarks = tmTopLeft
  end
  object Timer1: TTimer
    Enabled = False
    Interval = 50
    OnTimer = Timer1Timer
    Left = 36
    Top = 256
  end
end