Delphi | Way23

Exercism.io

На сайте exercism.io организовано обучение языкам программирования. Лучше всего сайт подойдёт тем кто уже знает один ЯП и хочет изучить новый. Для обучения доступно 52 языка, наибольшее количество задач по C#, Python и JavaScript.

Exercism бесплатный, работает благодаря сообществу. Пользователи делятся на учеников и наставников. Ученики выполняют задачи, а наставники проводят code review и дают советы. Комментарии от наставников полезные и продуманные, примеры я приложил ниже.

Выполнение задач

После выбора трека, устанавливаем консольное приложение. Запускаем команду, указанную в описании задачи на сайте, и приложение формирует каталог, файл с шаблоном для выполнения задачи и файл с тестами.

Выполняем задание, проверяем что решение проходит тесты. Выполнять задачи и проходить тесты можно в любой IDE, система на неё не завязана.

Выполняем ещё одну консольную команду и задача отправляется на проверку. Длительность проверки зависит от загруженности проверяющих на выбранном языковом треке. На треке Python я ждал проверки от дня до 3х недель. Первый комментарий от наставника:

Наставники уделяют особое внимание стилю и адекватности применяемых конструкций:

Бывают и более сложные замечания:

После исправления замечаний, решение снова отправляется на проверку. И так пока наставник не одобрит решение. Затем открывается следующая задача.

Такой принцип применяется к задачам из основного трека по языку. Кроме них есть ещё дополнительные задачи. Code review от наставника в них не обязателен, зато можно посмотреть решения других участников. В треке Python 18 основных задач и около 100 дополнительных.

Отличия строк, статических и динамических массивов в Delphi

Массивы и строки отличаются поведением при присваивании переменных. В случае строк, после присваивания и изменения значения в одной из переменных, создаётся новая строка. Примерно так же работают статические массивы (мне не удалось найти описание в документации). В отличии от них, динамические массивы просто присваиваются по ссылке.

Следующий участок кода демонстрирует различия в поведении:

function ArrayToStr(const AArray: array of Integer): string;
var
  i: Integer;
begin
  Result := '';
  for i in AArray do
    Result := Result + IntToStr(i);
end;

procedure TForm1.Button1Click(Sender: TObject);
var
  str1, str2: string;
  array_static1, array_static2: array[0..2] of Integer;
  array1, array2: array of Integer;
begin
  Memo1.Clear;
  Memo2.Clear;
  Memo3.Clear;

  // string

  str1 := '123';

  str2 := str1;
  str2[1] := '5';

  Memo1.Lines.Add(str1); // 123
  Memo1.Lines.Add(str2); // 532

  // array[0..2] of Integer

  array_static1[0] := 1;
  array_static1[1] := 2;
  array_static1[2] := 3;

  array_static2 := array_static1;
  array_static2[0] := 5;

  Memo2.Lines.Add(ArrayToStr(array_static1)); // 123
  Memo2.Lines.Add(ArrayToStr(array_static2)); // 532

  // array of Integer

  SetLength(array1, 3);
  array1[0] := 1;
  array1[1] := 2;
  array1[2] := 3;

  array2 := array1;
  array2[0] := 5;

  Memo3.Lines.Add(ArrayToStr(array1)); // 532
  Memo3.Lines.Add(ArrayToStr(array2)); // 532
end;

function ArrayToStr(const AArray: array of Integer): string;

var

i: Integer;

begin

Result := '';

for i in AArray do

Result := Result + IntToStr(i);

end;

procedure TForm1.Button1Click(Sender: TObject);

var

str1, str2: string;

array_static1, array_static2: array[0..2] of Integer;

array1, array2: array of Integer;

begin

Memo1.Clear;

Memo2.Clear;

Memo3.Clear;

// string

str1 := '123';

str2 := str1;

str2[1] := '5';

Memo1.Lines.Add(str1); // 123

Memo1.Lines.Add(str2); // 532

// array[0..2] of Integer

array_static1[0] := 1;

array_static1[1] := 2;

array_static1[2] := 3;

array_static2 := array_static1;

array_static2[0] := 5;

Memo2.Lines.Add(ArrayToStr(array_static1)); // 123

Memo2.Lines.Add(ArrayToStr(array_static2)); // 532

// array of Integer

SetLength(array1, 3);

array1[0] := 1;

array1[1] := 2;

array1[2] := 3;

array2 := array1;

array2[0] := 5;

Memo3.Lines.Add(ArrayToStr(array1)); // 532

Memo3.Lines.Add(ArrayToStr(array2)); // 532

end;

Детальное объяснение поведения строк в статье на DelphiKingdom пункт 2.16. Представление строк в памяти.

Оператор case без begin/end в Delphi

Перевод поста The case of a missing begin/end.

Delphi никогда не перестаёт удивлять меня... Вы знали что это правильный синтаксис?

case a of
  0: Writeln(0);
  else
    Writeln('else');
    Writeln(a);
end;

case a of

0: Writeln(0);

else

Writeln('else');

Writeln(a);

end;

Этот код компилируется и работает точно как следующий фрагмент.

case a of
  0: Writeln(0);
  else begin
    Writeln('else');
    Writeln(a);
  end;
end;

case a of

0: Writeln(0);

else begin

Writeln('else');

Writeln(a);

end;

Я лично никогда бы не убрал begin/end внутри оператора case/else, но не все согласяться с этим. Я нашёл такой пример в очень (ОЧЕНЬ!) старом кода (он был написан на Delphi 2) и я был довольно удивлён, что он компилируется.

Anton Alisov предложил форматировать первый пример так:

case a of
  0: Writeln(0);
else
  Writeln('else');
  Writeln(a);
end;

case a of

0: Writeln(0);

else

Writeln('else');

Writeln(a);

end;

Я думаю так код выглядит более понятно.

Фундаментальные принципы объектно ориентированного проектирования (Часть 3): Полиморфизм

Вольный перевод статьи Fundamental Object Oriented Design principles (Part 3): Polymorphism.

Рассмотрим Полиморфизм предоставляемый объектно ориентированными языками программирования.

Это третья часть серии об объектно ориентированном проектировании. Для того чтобы понять почему изучение шаблонов проектирования важно, мы должны начать с рассмотрения того что такое хороший объектно ориентированный дизайн приложения. Объектно ориентированные языки предоставляют уникальные возможности которые содействуют хорошему дизайну приложения.

Рассматриваемые принципы проектирования применены для не объектно ориентированных языков, но с большими сложностями.

Что такое Полиморфизм?

Когда мы ссылаемся на объект мы хотим чтобы его поведение определялось типом объекта, а не типом ссылки которую мы используем. Обращение может идти даже через абстрактный тип (например, class abstract в Delphi), всё равно должны вызываться методы типа конкретного экземпляра объекта на который указывает ссылка. Это суть полиморфизма. Как вы видели в разделе про абстракцию мы можем взаимодействовать с объектами через переменную с типом класса-предка, хотя объект, на который ссылается переменная, на самом деле является экземпляром класса-потомка.

Наиболее общее понимание полиморфизма в том что метод может быть виртуальным. Это означает что класс-потомок может переопределить метод и заменить реализацию предка на свою собственную.

Читать далее Фундаментальные принципы объектно ориентированного проектирования (Часть 3): Полиморфизм

Фундаментальные принципы объектно ориентированного проектирования (Часть 2): Инкапсуляция

Вольный перевод статьи Fundamental Object Oriented Design principles (Part 2): Encapsulation.

Рассмотрим принцип Инкапсуляции используемый объектно ориентированными языкми программирования.

Это вторая часть серии об объектно ориентированном проектировании. Чтобы полностью понять почему изучение шаблонов проектирования важно, мы должны начать с рассмотрения того что такое хороший объектно ориентированный дизайн приложения.

ОО-языки предоставляют уникальные возможности, которые содействуют хорошему дизайну приложения. Рассматриваемые принципы проектирования могут быть применены и для не объектно ориентированных языков, но это потребует больших усилий.

Эта статья предполагает что вы знакомы как минимум с одним ОО языком программирования. C++, Delphi, C# и Java являются примерами объектно ориентированных языков. В отличии от них JavaScript основан на объектах, в нём используется прототипирование вместо классов. Настоящий ОО язык программирования имеет классы, объекты и очень часто интерфейсы.

Что такое Инкапсуляция?

Объекты являются строительными блоками используемыми в ОО языках программирования. Объекты — структуры которые инкапсулируют данные и функции вместе, это простейший вид инкапсуляции.

Читать далее Фундаментальные принципы объектно ориентированного проектирования (Часть 2): Инкапсуляция

Оператор with и декомпозиция методов в Delphi

У нас в команде запрещён к использованию оператор with. Основная причина в проблемах с надёжность кода с with. Существует и другая сторона работы с with. Часто его применение указывает на плохую организацию кода и переместив код в более адекватное место оператор with станет просто не нужен. Рассмотрим два примера.

Перемещение кода

Иногда with используется для формы или датамодуля чтобы установить свойства, возможно, вызывать несколько методов.

Читать далее Оператор with и декомпозиция методов в Delphi

Написание простого DSL компилятора на Delphi (7. Компилятор AST)

Перевод поста Writing a Simple DSL Compiler with Delphi (7. AST Compiler).

Эта статья представляет собой описание компилятора AST используемого для проекта моего языка программирования. Если вы только начинаете читать эту серию, то я бы рекомендовал вам начать с этого поста. Как минимум вы должны прочитать предыдущий пост Intermezzo так как он разъясняет некоторые части компилятора которых я не касаюсь здесь.

В каркасе моего игрушечного компилятора, компилятор (или codegen, как он называется внутри) — часть кода которая реализует интерфейс ISimpleDSLCodegen. Этот интерфейс предоставляет только одну функцию, Generate, которая принимает абстрактное синтаксическое дерево и преобразует его в объект, который реализует интерфейс ISimpleDSLProgram, который позволяет вам вызывать любую функцию скомпилированной программы по имени.

Читать далее Написание простого DSL компилятора на Delphi (7. Компилятор AST)

Написание простого DSL компилятора на Delphi (Intermezzo)

Перевод поста Writing a Simple DSL Compiler with Delphi (Intermezzo).

Когда я подготавливал статью про компилятор для моего игрушечного языкового проекта, я обнаружил что концепцию обёртки целой программы в связку анонимных функций (что делает компилятор) чрезвычайно сложна для объяснения. Поэтому я подготовил упрошенную версию компилятора, написанную для очень упрошенного языка... а затем я так и не смог остановится и добавил AST, пакрсер и токинезатор.

Результатом всего этого является программа introduction.dpr, автономная программа которая содержит полностью язык (очень тривиальный) вместе с полной документацией, написанная в стиле Грамотного программирования. Упрощено — вы можете читать её сверху вниз как историю.

В качестве intermezzo и для упрощения моего объяснения компилятора, я опишу эту программу здесь полностью, отформатировав её как пост в блог.

Читать далее Написание простого DSL компилятора на Delphi (Intermezzo)

Написание простого DSL компилятора на Delphi (6. Дамп AST)

Перевод поста Writing a Simple DSL Compiler with Delphi (6. AST Dumper).

Эта статья представляет описание инструмента для тестирования моего игрушечного языка программирования. Если вы только начинаете читать эту серию, то я бы рекомендовал вам начать с этого поста.

Пожалуйста, имейте в виду, что эта статья описывают начальную реализацию парсера. Если вы хотите просматривать код во время чтения статьи, убедитесь, что вы переключились на ветку dsl_v1.

Теперь, когда мы имеем работающий токинезатор и парсер генерирующие на выходе AST, мы можем начать работать над компилятором. Тем не менее, было бы отлично проверить корректность выходных данных парсера. Или по другому — нам нужны модульные тесты.

Тем не менее, написание модульных тестов для древовидных структур очень утомительная операция. В следующем посту я покажу тест для дерева в котором только пять листьев и это уже будет процесс который лучше пропустить. К счастью, мы можем сделать что-то более весёлое — мы можем написать код, который воссоздаст оригинальную программу из AST.

Читать далее Написание простого DSL компилятора на Delphi (6. Дамп AST)

Написание простого DSL компилятора на Delphi (5. Фреймворк)

Перевод поста Writing a Simple DSL Compiler with Delphi (5. Framework).

Эта статья представляет собой описание фреймворка используемого для проекта моего языка программирования. Если вы только начинаете читать эту серию, то я бы рекомендовал вам начать с этого поста.

Сейчас у нас есть работающий парсер который преобразует строку кода в абстрактное синтаксическое дерево. Однако ещё не время писать о самой интересной части — компиляторе — сначала мы должны сделать интеграцию и тестирование.

Мой игрушечный компилятор использует очень простой фреймворк доступ к которому производится через интерфейс ISimpleDSLCompiler (модуль SimpleDSLCompiler). Уместная часть интерфейса показана ниже:

Читать далее Написание простого DSL компилятора на Delphi (5. Фреймворк)

Пн	Вт	Ср	Чт	Пт	Сб	Вс
1	2	3	4	5	6	7
8	9	10	11	12	13	14
15	16	17	18	19	20	21
22	23	24	25	26	27	28
29	30