home *** CD-ROM | disk | FTP | other *** search
/ Delphi Programming Unleashed / Delphi_Programming_Unleashed_SAMS_Publishing_1995.iso / chap32 / simpdde / mainc.txt < prev    next >
Text File  |  1995-03-20  |  1KB  |  55 lines
  1. object Form1: TForm1
  2.   Left = 201
  3.   Top = 101
  4.   Width = 435
  5.   Height = 300
  6.   Caption = 'Simple Client'
  7.   Color = clBlack
  8.   Font.Color = clWindowText
  9.   Font.Height = -13
  10.   Font.Name = 'System'
  11.   Font.Style = []
  12.   PixelsPerInch = 96
  13.   TextHeight = 16
  14.   object Label1: TLabel
  15.     Left = 0
  16.     Top = 0
  17.     Width = 427
  18.     Height = 109
  19.     Align = alTop
  20.     Alignment = taCenter
  21.     Caption = 'Label1'
  22.     Font.Color = clBlue
  23.     Font.Height = -96
  24.     Font.Name = 'Times New Roman'
  25.     Font.Style = []
  26.     ParentFont = False
  27.   end
  28.   object Connect: TButton
  29.     Left = 184
  30.     Top = 200
  31.     Width = 89
  32.     Height = 33
  33.     Caption = 'Connect'
  34.     TabOrder = 0
  35.     OnClick = ConnectClick
  36.   end
  37.   object DdeClientConv1: TDdeClientConv
  38.     DdeService = 'SimpServ'
  39.     DdeTopic = 'DdeServerConv1'
  40.     Left = 24
  41.     Top = 8
  42.     LinkInfo = (
  43.       'Service SimpServ'
  44.       'Topic DdeServerConv1')
  45.   end
  46.   object DdeClientItem1: TDdeClientItem
  47.     Text = '25  '
  48.     Lines.Strings = (
  49.       '25  ')
  50.     DdeConv = DdeClientConv1
  51.     Left = 56
  52.     Top = 8
  53.   end
  54. end
  55.