unit1.lfm 962 B

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253
  1. object Form1: TForm1
  2. Left = 266
  3. Height = 240
  4. Top = 145
  5. Width = 320
  6. Caption = 'Form1'
  7. ClientHeight = 240
  8. ClientWidth = 320
  9. OnCreate = FormCreate
  10. Position = poDesktopCenter
  11. LCLVersion = '1.1'
  12. object StringGrid1: TStringGrid
  13. Left = 0
  14. Height = 165
  15. Top = 0
  16. Width = 320
  17. Align = alClient
  18. TabOrder = 0
  19. OnSelection = StringGrid1Selection
  20. end
  21. object Button1: TButton
  22. Left = 0
  23. Height = 25
  24. Top = 165
  25. Width = 320
  26. Align = alBottom
  27. AutoSize = True
  28. Caption = '&Load'
  29. OnClick = Button1Click
  30. TabOrder = 1
  31. end
  32. object Button2: TButton
  33. Left = 0
  34. Height = 25
  35. Top = 215
  36. Width = 320
  37. Align = alBottom
  38. AutoSize = True
  39. Caption = '&Clear'
  40. OnClick = Button2Click
  41. TabOrder = 2
  42. end
  43. object btFind: TButton
  44. Left = 0
  45. Height = 25
  46. Top = 190
  47. Width = 320
  48. Align = alBottom
  49. Caption = '&Find'
  50. OnClick = btFindClick
  51. TabOrder = 3
  52. end
  53. end