GUID.dfm 939 B

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849
  1. object frmGUID: TfrmGUID
  2. Left = 407
  3. Top = 298
  4. BorderStyle = bsSingle
  5. Caption = 'Create GUID'
  6. ClientHeight = 72
  7. ClientWidth = 416
  8. Color = clBtnFace
  9. Font.Charset = DEFAULT_CHARSET
  10. Font.Color = clWindowText
  11. Font.Height = -11
  12. Font.Name = 'MS Sans Serif'
  13. Font.Style = []
  14. FormStyle = fsStayOnTop
  15. OldCreateOrder = False
  16. Position = poOwnerFormCenter
  17. OnShow = FormShow
  18. PixelsPerInch = 96
  19. TextHeight = 13
  20. object txtGUID: TEdit
  21. Left = 8
  22. Top = 8
  23. Width = 401
  24. Height = 21
  25. Color = cl3DLight
  26. ReadOnly = True
  27. TabOrder = 0
  28. end
  29. object btnClose: TButton
  30. Left = 336
  31. Top = 40
  32. Width = 75
  33. Height = 25
  34. Cancel = True
  35. Caption = '&Close'
  36. ModalResult = 1
  37. TabOrder = 1
  38. end
  39. object btnGenerate: TButton
  40. Left = 256
  41. Top = 40
  42. Width = 75
  43. Height = 25
  44. Caption = '&Generate'
  45. Default = True
  46. TabOrder = 2
  47. OnClick = btnGenerateClick
  48. end
  49. end