jsj_DELPHI基本语法(14)

delphi网络资源总结,话了重点,方便阅读,记忆

CalNo var CalNo Number Nnmber 10 const

2.1.8.2

procedure function procedure validateDate(Day : Integer; month :

Integer; Year : Integer); procedure ValidateDate(Day, Month, Year : Integer); Double function

CalculateInterest(principal,InterestRate:Double):Double;

2.1.8.3

Object Pascal Delphi type type Tcount = Integer; TPrimaryColor = (Red,Yellow,Blue); TTestIndex = 1..100; TTextValue = -99..99; TTestList = array [TTestIndex] of TTestValue; TCharVal = Ord('A')..Ord('Z') ; Today = (Monday,Tuesday,Wednesday,Thursday,Friday,Saturday, Sunday) ;