Hvordan deklarere lokale rutiner i Delphi? Det er mulig å erklære lokale prosedyrer orFunctions innenfor en prosedyre eller function.Though det synes noen hvor uvanlig ved første øyekast å declareLocal rutiner i en rutine, er det effektivt å gjøre dette .Hvis vi ikke trenger dem hvor som helst annet enn rutine, hvorfor shouldmake dem offentlig selv innenfor enhet? La oss plassere dem i deres properplace, gode rutiner på riktig sted! Vi erklærer lokale variabler, konstanter og typer før BEGIN uttalelse Ofa funksjon eller prosedyre. Vi kan også inkluderer lokale rutiner her. Selv om det isefficient å inkludere lokale rutiner her, men i praksis svært få Delphi programmersuse disse techniques.Example: Prosedyre PublicProc (p1: TypeofP1; p2: TypeofP2; .... pn: TypeOfPn); Var v1: TypeofV1; V2: TypeofV2; ..... Vn: TypeofVn; konst c1: TypeofC1; ............ ............ Prosedyre LocalProcedure1 (P1: TypeofP1 P2: TypeofP2; .... pn: TypeOfPn); Var ......... ......... begynne ......... ......... slutten; Prosedyren LocalProcedure2 (p1: TypeofP1; p2: TypeofP2; .... pn: TypeOfPn); Var ......... ......... begynne ......... ......... slutten; Funksjon LocalFunction1 (p1: TypeofP1; p2: TypeofP2; .... pn: TypeOfPn): ResultType; Var ......... ......... begynne ......... ......... resultat: = ..... slutten; Funksjon LocalFunction2 (p1: TypeofP1; p2: TypeofP2; .... pn: TypeOfPn): ResultType; Var ......... ......... begynne ......... ......... resultat: = ..... slutten; begin { PublicProc} ........... '' '' '' '' '' 'LocalProcedure1 (...., ...., ....); ........... LocalProcedure2 (...., ...., ....); ........... V1: = LocalFunction1 (...., ...., ....); ........... V2: = LocalFunction2 (...., ...., ....); ........... '' '' '' '' '' 'Ende; {PublicProc} I dette eksempelet omfanget av nestet routinesLocalProcedure1, LocalProcedure2, LocalFunction1 andLocalFunction2is begrenset bare til PublicProc. Ingen andre rutiner i samme enhet eller i otherunits kan se them.For noen reell eksempel på nøstede rutiner, ta en titt på artikkelen "Konvertere Tall til ord!".