Курсовая работа: Разработка программы при помощи языка программирования языка Delphi

38. procedure FormCreate(Sender: TObject);

39. procedure NCreateClick(Sender: TObject);

40. procedure NOpenClick(Sender: TObject);

41. procedure NShowClick(Sender: TObject);

42. procedure NSaveClick(Sender: TObject);

43. procedure NSaveAsClick(Sender: TObject);

44. procedure NExitClick(Sender: TObject);

45. procedure NInfoClick(Sender: TObject);

46. procedure BBPrevClick(Sender: TObject);

47. procedure BBNextClick(Sender: TObject);

48. procedure BBUpdateClick(Sender: TObject);

49. procedure BBAddClick(Sender: TObject);

50. procedure BBDeleteClick(Sender: TObject);

51. procedure BBSearchClick(Sender: TObject);

52. private

53. { Private declarations }

54. public

55. { Public declarations }

56. end;

57. TComp = record

58. Name:string[20];

59. HDD:real;

60. RAM:integer;

61. Monitor:string[20];

62. Inet:boolean; {true - есть, false - нет}

63. end;

64. ATComp = array of TComp;

65. var

66. Form1: TForm1;