{  É necessário declarar DateUtils,
em versões unicode declare System.DateUtils }
 
// Função do Delphi: Yesterday
 
// Exemplo
procedure TForm1.Button1Click(Sender: TObject);
begin
   ShowMessage( FormatDateTime('dd.mm.yyyy', Yesterday) );
end;