of routine, in Delphi, hoe lokale routine?In de programma 's of functies, in functie van de lokale of de verklaring is mogelijk, hoewel het op het eerste gezicht dat lokale routine, in normale omstandigheden, als we ze niet nodig, waarom laten ze in de flat van open?We zetten ze in voorkomend geval eventueel passende plaatsen.,,, we de lokale variabelen, constante en soorten in het begin voor de verklaring, een functie of een proces.We kunnen ook hier met de routine.Hoewel zij doeltreffend zijn, met inbegrip van plaatselijke gewoonten, hier, maar in de praktijk weinig Delphi programmeur, het gebruik van deze technologie, bijvoorbeeld:.,,,,, programma 's publicproc (P1:typeofp1; P2:typeofp2;...; Pn:typeofpn), var, de V1 en V2, typeofv1;:: typeofv2;,,,...,,, VN:typeofvn; totaal, C1:typeofc1;,,,,,...,..., het programma localprocedure1 (P1:typeofp1; P2:typeofp2;... Pn:typeofpn);,,,,...... var, de... De...,,,,,,,............ het einde;,,,, programma' S localprocedure2 (P1:typeofp1; P2:typeofp2;... Pn:typeofpn);,,,,...... var, de... De...,,,,,,,,...,..., een einde te maken aan de functie van localfunction1;,, (P1:typeofp1; P2:typeofp2;...Pn:typeofpn):resulttype;,,,,......... VaR,.........,,,开始,,,,.........,.........,结果:= .....结束;,,,,功能localfunction2(P1:typeofp1;P2:typeofp2;的…Pn:typeofpn):resulttype;,,,.........,VaR首先,.........,,,,,,.........,.........,结果:= .....结束;,,,,,开始publicproc } {,,,,...........,''''''''''',localprocedure1(…的…的…,,,,,);...........,localprocedure2(…的…的…,,,,,...........,);V1:= localfunction1(…的…的…,,,,,);...........,V2:= localfunction2(…的…的…,,,,,);...........,'''''''''''结束;publicproc } {,,,,,在这个例子中,范围localprocedure1嵌套例程,,,,,,localprocedure2,,localfunctioLocalfunction2 N1,,,, is beperkt tot de publicproc.Geen andere routine in dezelfde eenheid of andere eenheden kan ze zien, als een echte. En voorbeelden... Routine, kijk naar dit artikel, "de omrekening van de cijfers voor de woorden".,,,.