Merge pull request #31 from bomrafinha/bomrafinha

Versão 1.4.4.118

Author: bomrafinha

README.md

@@ -5,7 +5,7 @@
 <br />
 
 ![Maintenance](https://img.shields.io/maintenance/yes/2020)
-![Build](https://img.shields.io/badge/Build-1.0.0.0-brightgreen) 
+![Build](https://img.shields.io/badge/Build-1.4.4.118-brightgreen) 
 ![GitHub release (latest by date)](https://img.shields.io/github/v/release/bomrafinha/SortingAlgorithms)
 ![GitHub Release Date](https://img.shields.io/github/release-date/bomrafinha/SortingAlgorithms)
 ![Github repo age](https://img.shields.io/github/issues/detail/age/bomrafinha/SortingAlgorithms/1.svg?style=flat-square)
@@ -154,10 +154,10 @@ Os *releases* do repositório serão feitos a cada vez que um módulo estiver 10
 <br />
 
 ### Padrões adotados no projeto
-Para um melhor entendimento do projeto foi-se adotado alguns padrões que facilitam a identificação de cada estrutura usada. São, basicamente, o uso de *camelcase*, com variações nas iniciais;
+Para um melhor entendimento do projeto foi-se adotado alguns padrões que facilitam a identificação de cada estrutura usada. São, basicamente, o uso de *camelCase*, e *PascalCase*;
 
 #### Variáveis de método
-Variáveis locais devem ser *camelcase* iniciando em minúsculo.
+Variáveis locais devem ser *camelCase*.
 
 Observar o espaçamento entre a declaração de variáveis e o inicio do método.
 
@@ -166,12 +166,12 @@ Observar o espaçamento entre a declaração de variáveis e o inicio do método
 #### Variáveis privadas
 A declaração de váriaveis privadas deve ocorrer sempre dentro dos modificadores de acesso. 
 
-Devem começar sempre com "f" minúsculo, seguido por seu nome em *camelcase* com a inicial em maiúsculo.
+Devem ser *camelCase* começando sempre com "f" seguido por seu nome.
 
 ![Variáveis privadas](documentation/images/padrao_variaveis_privadas.png)
 
 #### Propriedades
-Propriedades devem usar *camelcase* começando sempre com a inicial em maiúsculo.
+Propriedades devem usar *PascalCase*.
 
 Devem ter exatamente o nome de sua variável privada e/ou metodo de acesso, eliminando apenas o prefixo (f, get, set).
 
@@ -180,21 +180,23 @@ Devem ter exatamente o nome de sua variável privada e/ou metodo de acesso, elim
 #### Métodos
 A declaração de métodos deve ocorrer sempre dentro dos modificadores de acesso. 
 
-Métodos devem ser *camelcase* iniciando em minúsculo.
+Métodos devem ser *camelCase*.
 
-Os parâmetros do método devem ser *camelcase* iniciando em minúsculo.
+Os parâmetros do método devem ser *camelCase* iniciando com "a".
 
 Procurar, quando possível, usar prefixos *get*, *set*, *eh*, etc de acordo com a função do método e/ou seu retorno.
 
+Ao serem chamados usar sempre parentesis em sua chamada, mesmo quando sem parâmetros. Ex: meuMetodo();
+
 ![Métodos](documentation/images/padrao_metodos.png)
 
 #### Interfaces
-Interfaces devem começar sempre com a letra "I" (maiúsculo), seguido por seu nome em *camelcase* com a inicial em maiúsculo também.
+Interfaces devem começar sempre com a letra "I" (maiúsculo), seguido por seu nome em *PascalCase*.
 
 ![Interfaces](documentation/images/padrao_interfaces.png)
 
 #### Classes
-Classes devem começar sempre com a letra "T" (maiúsculo), seguido por seu nome em *camelcase* com a inicial em maiúsculo também.
+Classes devem começar sempre com a letra "T" (maiúsculo), seguido por seu nome em *PascalCase*.
 
 Classes que não extendem nenhuma outra classes em específico devem extender *TInterfacedObject*.
 
@@ -223,6 +225,15 @@ Separar declações de variáveis, métodos, construtores, destrutores e proprie
 
 ![Identação](documentation/images/padrao_identacao_01.png)
 
+#### Chamada de métodos e variaveis internas da classe
+
+Devem ser precedidas da palavra reservada *Self*, para facilitar a leitura do código.
+
+![Self](documentation/images/padrao_self_01.png)
+
+#### Palavras Reservadas
+Dá-se preferência ao uso de iniciais minúsculas para palavras reservadas. Porém isso não é uma regra para o projeto tendo em vista que por serem reservadas a IDE às sinaliza, não atrapalhando, assim, a leitura do código.
+
 #### Um código bem padronizado é muito mais fácil de ler, mesmo por programadores que utilizam outras linguagens.
 
 <br />
@@ -235,10 +246,17 @@ Separar declações de variáveis, métodos, construtores, destrutores e proprie
 + Estrutura básica do código
 
 + Algoritmos
-  - Bubble Sort
-  - Insertion Sort
-  - Selection Sort
-  - Comb Sort
+  - Bogo Sort
+  - Merge Sort
+  - Heap Sort
+  - Shell Sort
+  - Radix Sort
+  - Gnome Sort
+  - Counting Sort
+  - Bucket Sort
+  - Cocktail Sort
+  - Tim Sort
+  - Quick Sort
 
 <br />
 
@@ -259,6 +277,7 @@ SortingAlgorithms
 │       ├── padrao_interfaces.png
 │       ├── padrao_metodos.png
 │       ├── padrao_propriedades.png
+│       ├── padrao_self_01.png
 │       ├── padrao_variaveis_locais.png
 │       ├── padrao_variaveis_privadas.png
 │       ├── project_issue.png

documentation/images/padrao_metodos.png

@@ -5,31 +5,22 @@ interface
 uses U_SortClass, U_SortInterface, FMX.Layouts, System.SysUtils;
 
 type
-  TSortBubble = class(TSortClass, ISortInterface<TLayout>)
+  TSortBubble = class(TSortClass, ISortInterface)
   private
-    procedure sort(layout01 : TLayout);
+    function algoritmo() : Boolean; Override;
 
-  public
-    constructor Create(layout01 : TLayout);
   end;
 
 implementation
 
 { TSortBubble }
 
-constructor TSortBubble.Create(layout01: TLayout);
-begin
-  inherited Create(layout01);
-  sleep(2000);
-  sort(layout01);
-
-end;
-
-procedure TSortBubble.sort(layout01: TLayout);
+function TSortBubble.algoritmo() : Boolean;
 var
   i, j : Integer;
 
 begin
+  Result := False;
   for i := 48 downto 0 do
   begin
     for j := 0 to i do
@@ -41,6 +32,8 @@ procedure TSortBubble.sort(layout01: TLayout);
     end;
   end;
 
+  Result := True;
+
 end;
 
 end.

documentation/images/padrao_self_01.png

@@ -5,31 +5,22 @@ interface
 uses U_SortClass, U_SortInterface, FMX.Layouts, System.SysUtils;
 
 type
-  TSortComb = class(TSortClass, ISortInterface<TLayout>)
+  TSortComb = class(TSortClass, ISortInterface)
   private
-    procedure sort(layout01 : TLayout);
+    function algoritmo() : Boolean; Override;
 
-  public
-    constructor Create(layout01 : TLayout);
   end;
 
 implementation
 
 { TSortComb }
 
-constructor TSortComb.Create(layout01: TLayout);
-begin
-  inherited Create(layout01);
-  sleep(2000);
-  sort(layout01);
-
-end;
-
-procedure TSortComb.sort(layout01: TLayout);
+function TSortComb.algoritmo() : Boolean;
 var
   i, gap, tamanho : Integer;
 
 begin
+  Result := False;
   tamanho := 50;
   gap := trunc(tamanho / 1.3);
   while ((gap > 0) and  (i <> tamanho - 1)) do
@@ -45,6 +36,7 @@ procedure TSortComb.sort(layout01: TLayout);
     end;
     gap := Trunc(gap / 1.3);
   end;
+  Result := True;
 
 end;
 

modules/BubbleSort/U_Sort.Bubble.pas

@@ -5,32 +5,23 @@ interface
 uses U_SortClass, U_SortInterface, FMX.Layouts, System.SysUtils;
 
 type
-  TSortInsertion = class(TSortClass, ISortInterface<TLayout>)
+  TSortInsertion = class(TSortClass, ISortInterface)
   private
-    procedure sort(layout01 : TLayout);
+    function algoritmo() : Boolean; Override;
 
-  public
-    constructor Create(layout01 : TLayout);
   end;
 
 implementation
 
 { TSortInsertion }
 
-constructor TSortInsertion.Create(layout01: TLayout);
-begin
-  inherited Create(layout01);
-  sleep(2000);
-  sort(layout01);
-
-end;
-
-procedure TSortInsertion.sort(layout01: TLayout);
+function TSortInsertion.algoritmo() : Boolean;
 var
   i, j : Integer;
   key : Single;
 
 begin
+  Result := False;
   for j := 1 to 49 do
   begin
     key := findRectangle(j).Height;
@@ -44,6 +35,7 @@ procedure TSortInsertion.sort(layout01: TLayout);
 
     end;
   end;
+  Result := True;
 end;
 
 end.

modules/CombSort/U_Sort.Comb.pas

@@ -5,31 +5,22 @@ interface
 uses U_SortClass, U_SortInterface, FMX.Layouts, System.SysUtils;
 
 type
-  TSortSelection = class(TSortClass, ISortInterface<TLayout>)
+  TSortSelection = class(TSortClass, ISortInterface)
   private
-    procedure sort(layout01 : TLayout);
+    function algoritmo() : Boolean; Override;
 
-  public
-    constructor Create(layout01 : TLayout);
   end;
 
 implementation
 
 { TSortSelection }
 
-constructor TSortSelection.Create(layout01: TLayout);
-begin
-  inherited Create(layout01);
-  sleep(2000);
-  sort(layout01);
-
-end;
-
-procedure TSortSelection.sort(layout01: TLayout);
+function TSortSelection.algoritmo() : Boolean;
 var
   i, j, min : Integer;
 
 begin
+  Result := False;
   for i := 0 to 48 do
   begin
     min := i;
@@ -42,6 +33,7 @@ procedure TSortSelection.sort(layout01: TLayout);
     end;
     troca(findRectangle(min), findRectangle(i));
   end;
+  Result := True;
 end;
 
 end.

modules/InsertionSort/U_Sort.Insertion.pas

@@ -298,11 +298,13 @@
         <DCC_DcuOutput>../output</DCC_DcuOutput>
         <VerInfo_IncludeVerInfo>true</VerInfo_IncludeVerInfo>
         <VerInfo_Locale>1046</VerInfo_Locale>
-        <VerInfo_Build>21</VerInfo_Build>
+        <VerInfo_Build>105</VerInfo_Build>
         <VerInfo_Debug>true</VerInfo_Debug>
         <VerInfo_AutoIncVersion>true</VerInfo_AutoIncVersion>
-        <VerInfo_Keys>CompanyName=Bomrafinha;FileDescription=$(MSBuildProjectName);FileVersion=1.0.0.21;InternalName=SortingAlgorithms;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProgramID=com.embarcadero.$(MSBuildProjectName);ProductName=$(MSBuildProjectName);ProductVersion=1.0.0.0;Comments=</VerInfo_Keys>
+        <VerInfo_Keys>CompanyName=Bomrafinha;FileDescription=$(MSBuildProjectName);FileVersion=1.4.4.105;InternalName=SortingAlgorithms;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProgramID=com.embarcadero.$(MSBuildProjectName);ProductName=$(MSBuildProjectName);ProductVersion=1.0.0.0;Comments=</VerInfo_Keys>
         <DCC_UnitSearchPath>../app;../output;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
+        <VerInfo_MinorVer>4</VerInfo_MinorVer>
+        <VerInfo_Release>4</VerInfo_Release>
     </PropertyGroup>
     <PropertyGroup Condition="'$(Cfg_1_Win64)'!=''">
         <AppEnableRuntimeThemes>true</AppEnableRuntimeThemes>