Coelho na Rede

Já havia feito isso a um bom tempo atrás, mas hoje estava precisando fazer novamente o código que substitui caracteres com acento pelo correspondente sem acento no momento que a pessoa digitar a letra.
Porém, estava com preguiça de escrevê-lo novamente então acessei o Google para procurar.
Putz, nada... Será que ninguém mais usa Delphi aqui no Brasil ou o pessoal têm preguiça de postar uma dica na internet, hehe.
Brincadeiras a parte, resolvi publicar aqui no Coelho Na Rede. Então lá vai.
Basta codificar da seguinte forma o evento KeyPress do Edit que não pode ter caracter acentuado ou cedilha:

procedure TfrmCadastroPessoa.dbeNomePessoaKeyPress(Sender: TObject; var Key: Char);
begin
   inherited;
   case Key of
      'Á', 'Â', 'Ã', 'À', 'Ä', 'Å': Key := 'A';
      'á', 'â', 'ã', 'à', 'ä', 'å': Key := 'a';
      'é', 'ê', 'è', 'ë'          : Key := 'e';
      'É', 'Ê', 'È', 'Ë'          : Key := 'E';
      'í', 'î', 'ì', 'ï'          : Key := 'i';
      'Í', 'Î', 'Ì', 'Ï'          : Key := 'I';
      'ó', 'ô', 'õ', 'ò', 'ö'     : Key := 'o';
      'Ó', 'Ô', 'Õ', 'Ò', 'Ö'     : Key := 'O';
      'ú', 'û', 'ù', 'ü'          : Key := 'u';
      'Ú', 'Û', 'Ù', 'Ü'          : Key := 'U';
      'ç'                         : Key := 'c';
      'Ç'                         : Key := 'C';
      'ñ'                         : Key := 'n';
      'Ñ'                         : Key := 'N';
      'ý', 'ÿ'                    : Key := 'y';
      'Ý', 'Ÿ'                    : Key := 'Y';
   end;
end;

No mais é isso, outras dicas interessantes sobre como efetuar essa mudança você pode conferir no seguinte link (Evitar acentuação e cedilha da TiFórum)

Marcadores: Como_Fazer, Delphi, Desenvolvimento, Dicas

Atualmente já não é aconselhável ficar criando aplicações Delphi com BDE como conexão aos bancos de dados. Além disso, a própria Microsoft informa que não desenvolve mais conexões nativas para seus BD e que as melhores opções são o ODBC, ADO e OLE. Com isso, Delphi, como em outras ferramentas de desenvolvimento, possibilita a conexão através dessas tecnologias.
Lendo a documentação do Delphi você encontra várias informações de como efetivar esse tipo de conexão. Para quem está sem um ponto de partida tem que ler o seguinte artigo da ajuda do Delphi: Building a VCL Forms ADO Database Application.
Em breve, vou publicar um passo-a-passo de como fazer uma conexão via OLE DB.

Marcadores: Delphi, Desenvolvimento

Para quem gosta da ferramenta de desenvolvimento Delphi e quer desenvolver seus programas usando um software legal basta acessar a página da Code Gear, da Borland. Lá você encontra vários downloads relacionados às ferramentas da Borland, desde updates, trials até ferramentas gratuitas, que têm em seus nomes o prefixo Turbo, que entre eles está o Turbo Delphi. Existem duas ferramentas Turbo Delphi: (1) Turbo Delphi Explorer - Para desenvolvimento Windows. (2) Turbo Delphi for .Net - Para desenvolvimento em Dot Net. Essas duas ferramentas são na realidade o desmembramento do Delphi pago. Existem alguns detalhes nessas versões como você não poder instalar componentes na IDE, o que não quer dizer que você não possa utilizá-los. Outro detalhe é que você só é autorizado a ter instalado uma das versões, por vez, no seu computador, no mais é só conferir. Vale lembrar que para fazer o download dessas ferramentas você deve primeiramente se cadastrar no site, depois é só baixar o software e o código de ativação dele.

Marcadores: Delphi, Download

A pouco tempo atrás eu estava precisando desenvolver um cadastro que possibilitasse armazenar uma foto de cada pessoa cadastrada.
Como utilizo o Delphi 2005 com banco de dados Firebird (versões 1.5 e 2.0) não foi difícil desenvolver essa tela. Mas, como fazer para obter a foto da pessoa cadastrada diretamente de uma Webcam, facilitando assim a utilização do sistema.
Procurei na internet e acabei achando um site que falava sobre um componente que capturava imagens da webcam, porém, não estava completo e também só funcionava até o Delphi 7. Consegui baixar do SourceForge os componentes que faltavam e as atualizações dos que eu já tinha. Precisei fazer algumas alterações para que a captura passasse a funcionar, além de baixar duas Dll's do DirectX que são necessárias para a codificação funcionar.
Abaixo estão os links para o download dos componentes, das dll's e da janela de teste de captura de imagens:
* Componentes DSPack => (Download com as minhas alterações p/ Delphi 2005)
* Janela de Testes => (Download)
* Dll's do DirectX 9.2 => (Download)

Abaixo eu apresento algumas imagens de como ficou a janela de captura, que foi adaptada do exemplo que vem junto com o pacote do DSPack.

Fig1.: Preparando a captura


Fig2.: Efetuando a captura


Fig3.: Enviando imagem para a tela de cadastro

Quem tiver alguma dúvida, pode mandar uma mensagem que eu respondo.

Agradecimentos ao blog do DProgrammer que foi a fonte inicial da minha pesquisa.

Marcadores: Como_Fazer, Delphi, Desenvolvimento, Download