Um conhecimento só é válido quando compartilhado.

terça-feira, 8 de novembro de 2016

Técnica Para Ajudar no Dia Dia

Seja bem vindo a mais esse artigo, e boa leitura. 
Desenvolvedores, vive seu dia dia escrevendo código, mas claro o foco sempre na lógica e na melhor forma de fazer, e na maioria das vezes tem que recorrer a uma ajudinha, seja ela no help da linguagem ou no Google, para lembrar da sintaxe correta de um comando, procedure ou função. O sábio não é aquele que sabe e faz tudo, mas aquele que lembra que existe, e tem a coragem de procurar, e se não existe, a coragem de estudar para conseguir aprender e fazer. 
Existem situações das quais ao escrever um código, nos deparamos com a dúvida e o esquecimento de até mesmo o que nós criamos, exemplo o nome de uma coluna no banco de dados, e é nessa situação que vou passar uma dica de um possível recurso para ajudar no seu dia dia.
Em um ponto do código, precisa escrever um comando SQL, do qual vai selecionar varias colunas de uma determinada tabela do banco de dados, então faz:
'SELECT TableName.Codigo, TableName.Nome, TableName.Endereco FROM TableName'
Simples, mas nem toda vez irá lembrar de todos os nomes e de todas as tabelas do banco de dados, dai tende a parar, e ir olhar no banco qual o nome correto para a determinada coluna, e quando esse banco for dados manutenção por mais de uma pessoa, só tende piorando. 
Você já pensou em uma técnica para te ajudar no dia dia nesse caso? Não, então vou te dar uma dica, segue abaixo:
...
Type
  TMyTable = class
  private
    class function GetTableName: string;
    class function GetCodigo: string;
    class function GetNome: string;
    class function GetEndereco: string;
  public
    class property TableName: string read GetTableName;
    class property Codigo: string read GetCodigo;
    class property Nome: string read GetNome;
    class property Endereco: string read GetEndereco;
  end;

implementation

class function TMyTable.GetTableName: string;
begin
  Result := 'TableName';
end;  

class function TMyTable.GetCodigo: string;
begin
  Result := 'TableName.Codigo';
end;  

class function TMyTable.GetNome: string;
begin
  Result := 'TableName.Nome';
end;  

class function TMyTable.GetEndereco: string;
begin
  Result := 'TableName.Endereco';
end;  

end.

Usando a class: 'SELECT ' + TMyTable.Codigo + ',' +
                            TMyTable.Nome + ',' +
                            TMyTable.Endereco + 
                ' FROM ' + TMyTable.TableName;
Qual a vantagem? como criamos a class, nela estará todas as propriedades com os nomes dos campos da tabela, então ao precisarmos podemos pedir a ajuda do Delphi ao recurso "Code Completion" e ele mostrará todos os possíveis nomes existentes na class, facilitando assim nossa busca.

0 comentários :

Postar um comentário

SAC Automação Delphi e Lazarus

SAC Automação Delphi e Lazarus
Assine nosso SAC Automação Delphi e Lazarus para ter suporte técnico especializado em desenvolvimento

Quem sou eu

Minha foto

Proprietário/Administrador de Empresa em TI (Tecsis Informática)
  • Autor dos projetos OpenSource ORMBr, e DBCBr
  • Autor dos componentes ACBrInstall, ACBrSped, ACBrPaf, ACBrInStore, ACBrDownload.

Total de visualizações

Postagem em destaque

ORMBr - Mapeamento objeto-relacional

Mapeamento objeto-relacional ( ou ORM, do inglês: Object-relational mapping ) é uma técnica de desenvolvimento utilizada para reduzir...

Todo os direitos reservados.. Tecnologia do Blogger.

Seguidores

Google+ Seguindores