Рейтинг книги:
5 из 10

Рекурсия

Карпов Юрий

Уважаемый читатель, в нашей электронной библиотеке вы можете бесплатно скачать книгу «Рекурсия» автора Карпов Юрий в форматах fb2, epub, mobi, html, txt. На нашем портале есть мобильная версия сайта с удобным электронным интерфейсом для телефонов и устройств на Android, iOS: iPhone, iPad, а также форматы для Kindle. Мы создали систему закладок, читая книгу онлайн «Рекурсия», текущая страница сохраняется автоматически. Читайте с удовольствием, а обо всем остальном позаботились мы!
Рекурсия

Поделиться книгой

Описание книги

Серия:
Страниц: 2
Год:

Содержание

Отрывок из книги

Вот, что у меня получилось: // начало кода { 0 } unit Unit1; { 1 } { 2 } interface { 3 } { 4 } uses { 5 } Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, { 6 } Dialogs, StdCtrls, FileCtrl, CheckLst, ExtCtrls; { 7 } { 8 } type { 9 } TForm1 = class(TForm) { 10 } Panel1: TPanel; { 11 } Button1: TButton; { 12 } Button2: TButton; { 13 } CheckListBox1: TCheckListBox; { 14 } Label1: TLabel; { 15 } procedure Button1Click(Sender: TObject); { 16 } procedure FormCreate(Sender: TObject); { 17 } procedure Button2Click(Sender: TObject); { 18 } private { 19 } { Private declarations } { 20 } public { 21 } { Public declarations } { 22 } end; { 23 } { 24 } var { 25 } Form1: TForm1; { 26 } Path : AnsiString; // путь к папке с программой { 27 } Dir : AnsiString; { 28 } CCount : integer; // счетчик удалений { 29 } { 30 } implementation { 31 } { 32 } {$R *.dfm} { 33 }

Популярные книги

Рекурсия

Поделиться книгой

arrow_back_ios