Pegando a Data da Última Leitura de um arquivo

Escrito em 02 de Outubro de 2007 em Delphi, Linguagem Delphi por Feijo

Função pequena e útil, descobre quando aquele arquivo foi acessado pela última vez.
 
function FileAccessTime(FileName: String): TDateTime;var  FileHandle: Integer;  LTime,  FTimeA: TFileTime;  STime: TSystemTime;begin  FileHandle := FileOpen(FileName,fmShareDenyNone);
  if FileHandle >= 0 then  begin    // Accessado    GetFileTime(FileHandle,nil, @FTimeA, nil);    FileClose(FileHandle);    FileTimeToLocalFileTime(FTimeA,LTime);
    if FileTimeToSystemTime(LTime,STime) then    begin      Result := EncodeDate(STime.wYear,STime.wMonth,STime.wDay);      Result := Result + EncodeTime(STime.wHour,STime.wMinute,STime.wSecond,STime.wMilliSeconds);    end;  end;end;
 
procedure TForm1.Button1Click(Self);
begin
  ShowMessage(DateTimeToStr(FileAccessTime(’c:\windows\areia.bmp’));
end;
Se [...]

Guardando Métodos, Funcões e Procedimentos em Variáveis com Tipos Procedurais

Escrito em 28 de Julho de 2007 em Linguagem Delphi por Leonel Togniolli

Tipos Procedurais é um recurso interessante da linguagem Delphi que permite armazenar métodos, funções e procedimentos em variáveis e manipulá-los normalmente, passando como parâmetros, e chamando a função quando for necessário.
A sintaxe é simples:
type
TProcedimento = procedure;
TFuncao = function:string;
TFuncaoComParametro = function(Param: Integer):string;
TMetodo = procedure of object;

As duas primeiras [...]

Utilizando Assertions em Delphi

Escrito em 09 de Maio de 2007 em Linguagem Delphi por Leonel Togniolli

Assertions são validações sobre os fundamentos da lógica de um programa. A verificação de um assertion é a validação de que uma condição necessária para o algoritimo funcionar, algo que você supõe ser verdadeiro, é realmente válido durante a execução do programa.
Em Delphi, a sintaxe de um Assertion é a seguinte:
Assert(Condition: Boolean; [Message: [...]

Delphi Basics - Constructors, Aula 1

A partir de hoje iniciarei uma série de artigos que abordam principalmente conceitos básicos de programação na linguagem Delphi.
Pretendo nessa série de artigos abordar tudo relacionado à linguagem em si, como classes e objetos, encapsulamento, construtores/destrutores, exceções, hierarquia de classes e por ai em diante.
Inicialmente vamos criar uma unit chamada CursoDelphiBasic.pas, esta unit será nossa [...]

Windows Service acessando WebService

Escrito em 10 de Abril de 2007 em Delphi, Linguagem Delphi, Programação, VCL/RTL por Zote

Boa tarde pessoal!
Na verdade, este não é um artigo, apenas uma solução de um problema que tivemos e que muitos podem ter…
Temos um Windows Service feito em Delphi/win32 e hoje surgiu a necessidade dele acessar um WebService.
Importamos o wsdl, codificamos e na hora de executar… “access violation“. Bom, pode ser algo que fizemos de errado!
Refizemos [...]

FastMM e Delphi 2006

Continuando um tema anteriormente publicado, neste artigo vamos começar a detectar os vazamentos de memória (memory leaks) existentes em nossos aplicativos. (isso se existirem, é claro…)
A partir do Delphi 2006 o gerenciador de memória padrão que acompanha o Delphi passa a ser o FastMM. Quem não trabalha com Delphi 2006 pode baixar o FastMM aqui.
Se você [...]

Quanto de memória estou utilizando?

É comum muitos programadores, inclusive eu, há algum tempo atrás, medirem o consumo de memória de uma aplicação pelo gerenciador de tarefas do windows, o que é, na melhor das hipóteses, uma maneira incompleta de realizar essa verificação. O gerenciador de tarefas na verdade mostra a quantidade de memória que ele alocou naquele momento e não o quanto [...]

Criando seu próprio "splash-screen" na inicialização da IDE do BDS

Escrito em 18 de Janeiro de 2007 em Delphi, IDE, Linguagem Delphi por Alexandre José

Olá pessoal, resolvi colocar uma dica bacana para quem desenvolve pacotes de componentes.
Quem utiliza o BDS já reparou que alguns packages, depois de carregados, exibem um pequeno bitmap de 24×24 px. com a descrição do pacote de ferramentas e a empresa desenvolvedora na tela de inicialização da IDE. Podemos citar entre eles o JediVCS, RemObjects, TMS [...]

Introdução ao ECO

Escrito em 18 de Janeiro de 2007 em .Net, Delphi, ECO, Linguagem Delphi, Orientação a Objetos, Programação por Zote

 
ECO - Enterprise Core Objects, é um framework para persistência de objetos.
Você já pensou em como seria bom se precupar com o negócio e não com a tecnologia, não precisar se preocupar com operações de banco de dados (select, insert, update, delete)?
Se marcarmos o tempo se investimos nesse tipo de operação, veremos que não é [...]

Records no Turbo / Delphi 2006

Escrito em 17 de Janeiro de 2007 em Delphi, Linguagem Delphi, Programação por Alexandre José

Records na linguagem Delphi são, basicamente, um conjunto de vários elementos. Cada elemento é chamado de campo(field) e cada campo é formado por um nome(name) e tipo(datatype).
Exemplo:
type
TTechTips = record
Campo1 : Integer;
Campo2 : string;
end;
No Turbo/Delphi 2006 os records ficaram mais poderosos e espertos! Abaixo [...]

Próxima Página »