Delphiben hogyan lehet két számot összeadni?

Tényleg?

Google-ben nem sikerült megtalálni, hogyan lehet Delphi-ben összeadni két számot?

Biztos, hogy programozással kéne már foglalkoznod? Vannak előtte alapozó feladatok, pl hányat mutat az óra, vagy hány pötty van a katica hátán, satöbbi, satöbbi...

Szia.

A delphi Sysutiljában van egy pár dátummal foglalkozó rutin.

Nézz utánna a következőknek :

- DecodeDate és a visszafélé alakitó rutinnak :

- EncodeDate

itt egy példa ami a jövő évi dátumot "számolja ki" a mai napi dátumból :

DecodeDate(now,Year, Month, Day);

Year:=Year+1;

NextYear:= EncodeDate(Year, Month, Day);

ShowMessage('Év = '+ FormatDateTime('yyyy', NextYear));

De azért elvileg kellhet bele egy ellenőrzés (Szökőévben február 29-én nem müködik, vagy legalábbis gondolom nem jól müködik)

Sok sikert.

üdv.

> Delphiben hogyan lehet két számot összeadni?

c := a + b;

Ugyanúgy, mint Pascal-ban, vagy mint bármelyik másik programnyelvben, figyelve a szintaxisbeli eltérésre, ami maximum a kettőspont.

A keresőkifejezéseid lehetnek legközelebb:

- delphi tananyag

- delphi operátorok

- delphi tutorial

- delphi operators

"A 2016-ból kiszeretném vonni a jelenlegi évet (yyyy), amit a naptárból tud meg a program."

VÁLASZ:

(uses DateUtils;)

ShowMessage(IntToStr(2016-YearOf(Now)));

KÉRDÉS:

Ennek mi az értelme? :-)

Röviden:

uses DateUtils....

procedure TForm1.FormCreate(Sender: TObject);

var next : TDateTime;

begin

next := StrToDate('2016.06.15');

Form1.Caption := IntToStr(DaysBetween(now, next));

end;