Somar dias a uma data

Eh soh vc por

Data := data +10;

c a data for 1/10/01 vai ficar 11/10/01

É simplesmente fazer data+1

sendo a variavel DATA do tipo date (ou DateTime) o Delphi já entende que vc quer adicionar dias as datas .,..

[size=18:9a223ac6ec][color=blue:9a223ac6ec]Complementando a sugestão dos caros colegas .[/color:9a223ac6ec][/size:9a223ac6ec]

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;

type
TForm1 = class(TForm)
Edit1: TEdit;
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var data : TdateTime ;
begin
data:= DATE();[color=blue:9a223ac6ec] // sem este parametro ficaria o
// resultado = 31/12/1899 em vez
// da data atual acrecida de um dia[/color:9a223ac6ec]
data:=data+1;
edit1.Text := DateToStr(data);
end;

end.