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;
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