agiledev.com.br

dsutil.blogspot.com

DSUtil - Dicas de Delphi

http://dsutil.blogspot.com/2009/12/recursividade.html

DSUtil - Dicas de Delphi. Terça-feira, dezembro 29, 2009. Explicarei um assunto que geralmente é aprendido na faculdade, mas para aqueles que ainda não fizeram faculdade vou adiantar o assunto. Recursividade é uma técnica de programação, onde um método pode chamar a si mesmo. Você deve estar pensando: Ah, legal, mas. pra que serve isso? Um bom exemplo do uso da recursividade é a função que calcula um fatorial. O método abaixo realiza este cálculo. Reparem que o método chama a si mesmo no. N = 0 then.

dsutil.blogspot.com

DSUtil - Dicas de Delphi

http://dsutil.blogspot.com/2010/10/ordenacao-de-tlistview.html

DSUtil - Dicas de Delphi. Terça-feira, outubro 26, 2010. Olá galera, já faz algum tempo que não posto nada, mas essa dica é legal e vejo que muita gente tem dificuldade pra resolver. Então veja a solução:. Nesta dica, aproveito pra mostrar a implementação de métodos dentro de método, vejam que o método. Declare as seguintes variáves antes do implementation. LvSortOrder: array[0.4] of. CustomSortProc(Item1, Item2: TListItem; SortColumn: Integer. S1, s2: String. I1, i2: Integer. R1, r2: Boolean. Code = 0);.

dsutil.blogspot.com

DSUtil - Dicas de Delphi

http://dsutil.blogspot.com/2010_10_01_archive.html

DSUtil - Dicas de Delphi. Terça-feira, outubro 26, 2010. Olá galera, já faz algum tempo que não posto nada, mas essa dica é legal e vejo que muita gente tem dificuldade pra resolver. Então veja a solução:. Nesta dica, aproveito pra mostrar a implementação de métodos dentro de método, vejam que o método. Declare as seguintes variáves antes do implementation. LvSortOrder: array[0.4] of. CustomSortProc(Item1, Item2: TListItem; SortColumn: Integer. S1, s2: String. I1, i2: Integer. R1, r2: Boolean. Code = 0);.

dsutil.blogspot.com

DSUtil - Dicas de Delphi

http://dsutil.blogspot.com/2009_10_01_archive.html

DSUtil - Dicas de Delphi. Quarta-feira, outubro 07, 2009. Com esta dica é possível saber qual será o próximo dia útil a partir de uma data passada como parâmetro. A dica contempla apenas os finais de semana, mas pode ser melhorada. Obs: Se alguém melhorar a dica, me envie que postarei com prazer. DayOfWeek(dData) = 7 then. DayOfWeek(dData) = 1 then. Fonte: Active Delphi - enviada pelo colaborador Ricardo Diniz. Postado por Diego Silva. Americana, SP, Brazil. Visualizar meu perfil completo.

dsutil.blogspot.com

DSUtil - Dicas de Delphi

http://dsutil.blogspot.com/2011/09/agildev-desenvolvimento-de-sistemas.html

DSUtil - Dicas de Delphi. Quinta-feira, setembro 29, 2011. Agiledev - Desenvolvimento de Sistemas. A Agiledev é uma empresa Brasileira, atuante no mercado de desenvolvimento de sistemas e sites eficientes para empresas eficientes. Ela atua na região de Campinas, Americana, Sumaré, Nova Odessa e Santa Bárbara D'Oeste. Com tecnologia de ponta a Agiledev proporciona sempre o que há de melhor para seus clientes. Postado por Diego Silva. Assinar: Postar comentários (Atom). Americana, SP, Brazil.

dsutil.blogspot.com

DSUtil - Dicas de Delphi

http://dsutil.blogspot.com/2010/01/metodos-de-classe.html

DSUtil - Dicas de Delphi. Quinta-feira, janeiro 14, 2010. Os métodos de classe nos permitem que utilizemos métodos de uma classe sem que haja necessidade de instanciar um objeto dela. Particularmente utilizo muito esse recurso com telas de uso comum como por exemplo, um filtro por período. Esta tela do filtro sempre me retorna uma data inicial e uma data final. O procedimento comumente utilizado para obter esse resultado é:. 1 – Instanciar a tela. 2 – Exibi-la. 4 – Ler os valores. Notem que foi incluída ...

dsutil.blogspot.com

DSUtil - Dicas de Delphi

http://dsutil.blogspot.com/2009_08_01_archive.html

DSUtil - Dicas de Delphi. Quinta-feira, agosto 27, 2009. Melhorando a manipulação de arquivo texto. TForm1.Button1Click(Sender: TObject);. VARIÁVEL DE MANIPULAÇÃO DO ARQUIVO * *). INSTANCIA A VARIÁVEL * *). Arq := TStringList.Create;. ATRIBUI O NOME DO ARQUIVO COM O DIRETÓRIO * *). FileName := ' c: Teste.txt. VERIFICA SE O ARQUIVO EXISTE * *). CARREGA A VARIÁVEL COM O CONTEÚDO DO ARQUIVO TEXTO * *). ArqLoadFromFile(' c: Teste.txt. PERCORRE AS LINHAS (ÍNDICES) * *). I := 0 to. ArqCount - 1 do. I := 0 to.

dsutil.blogspot.com

DSUtil - Dicas de Delphi

http://dsutil.blogspot.com/2006_09_01_archive.html

DSUtil - Dicas de Delphi. Segunda-feira, setembro 11, 2006. Este método serve para adicionar/reduzir um determinado número de segundos em uma data. 86400) ANumberOfSeconds) / 86400;. Postado por Diego Silva. CENTRALIZA UMA String EM UM ESPAÇO DETERMINADO. L := (Len - Length(S) div. Str := str '. L := 1 to. Str := str s[L];. Postado por Diego Silva. SUBSTITUI UM CARACTERE DENTRO DA String. ReplaceStr(Text, Busca, Troca: string. N := 1 to. Copy(Text, n, 1) = Busca then. Delete(Text, n, 1);. Valor := valor *.

dsutil.blogspot.com

DSUtil - Dicas de Delphi

http://dsutil.blogspot.com/2009/12/utilizando-diretivas-de-compilacao.html

DSUtil - Dicas de Delphi. Segunda-feira, dezembro 21, 2009. Utilizando Diretivas de Compilação. Neste post irei ensinar como utilizar um recurso bastante interessante chamado Diretiva de Compilação. É muito comum esquecermos algum código como uma mensagem que usamos pra teste na versão que vai pro cliente e que não deveria né. A diretiva de compilação ajuda e evitar esses pequenos deslizes. Então vamos por a mão na massa. ShowMessage( 'Blz, deu certo! Neste exemplo chamaremos nossa diretiva de "TESTE".