FileExchange/Clipboard.dfm at main · tDavidM/FileExchange · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
object fClipboard: TfClipboard
  Left = 0
  Top = 0
  Caption = 'Presse-Papier'
  ClientHeight = 279
  ClientWidth = 617
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  Position = poMainFormCenter
  OnShow = FormShow
  DesignSize = (
    617
    279)
  PixelsPerInch = 96
  TextHeight = 13
  object bSend: TButton
    Left = 534
    Top = 248
    Width = 75
    Height = 25
    Anchors = [akRight, akBottom]
    Caption = 'Envoyer'
    TabOrder = 0
    OnClick = bSendClick
  end
  object mText: TMemo
    Left = 7
    Top = 8
    Width = 602
    Height = 234
    Hint = 'Ctrl+Clic pour effacer'
    Anchors = [akLeft, akTop, akRight, akBottom]
    ParentShowHint = False
    ReadOnly = True
    ShowHint = True
    TabOrder = 1
    OnMouseDown = mTextMouseDown
  end
  object eText: TEdit
    Left = 8
    Top = 250
    Width = 520
    Height = 21
    Anchors = [akLeft, akRight, akBottom]
    TabOrder = 2
    OnKeyPress = eTextKeyPress
  end
end