domingo, 4 de novembro de 2012

toString() no Delphi

Você sente falta do ToString no Delphi, então saiba que na versão XE3, isto é bem simples, basta utilizar um record Helper como mostro no trecho de código abaixo:

type
  Tinteiro = record helper for
    integer
    function ToString: string;
  end;

implementation
{ Tinteiro }
function Tinteiro.ToString: string;
begin
  result := IntToStr(Self);
end;

Esta técnica, você poderá utilizar para os outros tipos, por exemplo string, incluirmos o length... Em breve mostro como..



Nenhum comentário:

Postar um comentário