Código Delphi [-] Unit DateUtils var i:integer; begin i:= DaysBetween(DateTimePicker2.DateTime,DateTimePicker1.DateTime); Edit1.Text:=inttostr(i); end;
Unit DateUtils var i:integer; begin i:= DaysBetween(DateTimePicker2.DateTime,DateTimePicker1.DateTime); Edit1.Text:=inttostr(i); end;