Unit1.dfm 815 B

12345678910111213141516171819202122232425262728293031323334353637383940414243444546
  1. object Form1: TForm1
  2. Left = 0
  3. Top = 0
  4. Caption = 'Formulario'
  5. ClientHeight = 269
  6. ClientWidth = 317
  7. Color = clBtnFace
  8. Font.Charset = DEFAULT_CHARSET
  9. Font.Color = clWindowText
  10. Font.Height = -11
  11. Font.Name = 'Tahoma'
  12. Font.Style = []
  13. OldCreateOrder = False
  14. PixelsPerInch = 96
  15. TextHeight = 13
  16. object lst1: TListBox
  17. Left = 48
  18. Top = 40
  19. Width = 121
  20. Height = 97
  21. ItemHeight = 13
  22. Items.Strings = (
  23. 'Papas'
  24. 'Manzanas'
  25. 'Mandarinas'
  26. 'Uvas'
  27. 'Cebollas'
  28. 'Mel'#243'n'
  29. 'Sand'#237'a'
  30. 'Mango'
  31. 'Papaya'
  32. 'Pepino'
  33. 'Pi'#241'a')
  34. TabOrder = 0
  35. end
  36. object btn1: TButton
  37. Left = 48
  38. Top = 168
  39. Width = 121
  40. Height = 25
  41. Caption = 'Extraer seleccionado'
  42. TabOrder = 1
  43. OnClick = btn1Click
  44. end
  45. end