Советы по Delphi. Версия 1.4.3 от 1.1.2001

   040303030303030303F8FF03F803F8FF0303F8FF03030303030303FA02FA0303

   03FA0202020403030303030303F8FFF8030303F8FF0303F8FF03030303030303

   FA0303030303FA0202020403030303030303F80303030303F8FF0303F8FF0303

   0303030303030303030303FA0202020403030303030303030303030303F8FF03

   03F8FF03030303030303030303030303FA020202040303030303030303030303

   0303F8FF0303F8FF03030303030303030303030303FA02020204030303030303

   03030303030303F8FF0303F8FF03030303030303030303030303FA0202020403

   030303030303030303030303F8FF0303F8FF03030303030303030303030303FA

   0202040303030303030303030303030303F8FF03F8FF03030303030303030303

   03030303FA0202030303030303030303030303030303F8FFF803030303030303

   030303030303030303FA0303030303030303030303030303030303F803030303

   0303030303030303030303030303030303030303030303030303030303030303

   0303

  }

  Margin = 2

  NumGlyphs = 2

  Spacing = -1

  IsControl = True

 end

 object CancelBtn: TBitBtn

  Left = 108

  Top = 216

  Width = 69

  Height = 39

  Caption = '&Отмена'

  TabOrder = 4

  Kind = bkCancel

  Margin = 2

  Spacing = -1

  IsControl = True

 end

 object Panel2: TPanel

  Left = 16

  Top = 88

  Width = 153

  Height = 49

  BevelInner = bvLowered

  BevelOuter = bvNone

  TabOrder = 1

  object Label1: TLabel

   Left = 24

   Top = 8

   Width = 5

   Height = 13

  end

  object Label2: TLabel

   Left = 8

   Top = 8

   Width = 48

   Height = 13

   Caption = 'Значение 2:'

  end

  object Edit2: TEdit

   Left = 8

   Top = 24

   Width = 121

   Height = 20

   MaxLength = 10

   TabOrder = 0

   Text = '0'

  end

 end

 object Panel1: TPanel

  Left = 16

  Top = 16

  Width = 153

  Height = 49

  BevelInner = bvLowered

  BevelOuter = bvNone

  TabOrder = 0

  object Label4: TLabel

   Left = 8

   Top = 8

   Width = 48

   Height = 13

   Caption = 'Значение 1:'

  end

  object Edit1: TEdit

   Left = 8

   Top = 24

   Width = 121

   Height = 20

   MaxLength = 10

   TabOrder = 0

   Text = '0'

  end

 end

 object Panel3: TPanel

  Left = 16

  Top = 144

  Width = 153

  Height = 49

  BevelInner = bvLowered

  BevelOuter = bvNone

  TabOrder = 2

  object Label6: TLabel

   Left = 8

   Top = 8

   Width = 48

   Height = 13

   Caption = 'Значение 3:'

  end

  object Edit3: TEdit

   Left = 8

   Top = 24

   Width = 121

   Height = 20

   MaxLength = 10

   TabOrder = 0

   Text = '0'

  end

 end

end

{ ***   КОНЕЦ КОДА DDEDLG.DFM *** }

{ *** НАЧАЛО КОДА DDEDLG.PAS *** }

{***************************************************}

{                                                   }

{   Delphi 1.0 DDEML Демонстрационная программа     }

{   Copyright (c) 1996 by Borland International     }

{                                                   }

{***************************************************}

{ Данный модуль определяет интерфейс сервера DataEntry DDE