home *** CD-ROM | disk | FTP | other *** search
/ PC World 2002 September / PCWorld_2002-09_cd.bin / Software / Topware / pspad / Context / Pascal.DEF < prev    next >
Text File  |  2001-08-12  |  2KB  |  149 lines

  1. ; Tento soubor obsahuje makra programu PSPad pro Pascal
  2. ;
  3. ; ╪ßdky zaΦφnajφcφ st°ednφkem a prßzdnΘ °ßdky jsou ignorovßny
  4. ;
  5. ; Formßt p°φkaz∙ :
  6. ;   [jmΘno_p°φkazu | popis p°φkazu (libovoln² text)]*klßvesovß_zkratka
  7. ;   °ßdek p°φkazu, kter² bude vlo₧en 
  8. ;   °ßdek p°φkazu, kter² bude vlo₧en ...
  9. ; hlaviΦka p°φkazu je uzav°ena do [], znak | slou₧φ jako odd∞lovaΦ
  10. ; jmΘna p°φkazu a komentß°e. 
  11. ; * urΦuje nepovinnou klßvesovou zkratku
  12. ; pokud °ßdek p°φkazu obsahuje znak |, kurzor se po vlo╛enφ do
  13. ; textu zastavφ na tomto mφst∞
  14. ; pokud °ßdek p°φkazu obsahuje znak º, bude zde vlo₧en oznaΦen² text
  15. ;
  16. ; autor: Borand - p°evzato z Delphi5
  17. ; poslednφ revize 12.8.2001
  18. ;
  19. [arrayd | array declaration (var)]
  20. array[0..|] of ;
  21.  
  22. [arrayc | array declaration (const)]
  23. array[0..|] of = ();
  24.  
  25. [cases | case statement]
  26. case | of
  27.   : ;
  28.   : ;
  29. end;
  30.   
  31. [casee | case statement (with else)]
  32. case | of
  33.   : ;
  34.   : ;
  35. else ;
  36. end;
  37.   
  38. [classf | class declaration (all parts)]
  39. Tº| = class(T)
  40. private
  41.  
  42. protected
  43.  
  44. public
  45.  
  46. published 
  47.  
  48. end;
  49.  
  50. [classd | class declaration (no parts)]
  51. Tº| = class(T)
  52.  
  53. end;
  54.  
  55. [classc | class declaration (with Create/Destroy overrides)]
  56. Tº| = class(T)
  57. private
  58.  
  59. protected
  60.  
  61. public
  62.   constructor Create; override;
  63.   destructor Destroy; override;
  64. published 
  65.  
  66. end;
  67.  
  68. [fors | for (no begin/end)]
  69. for | :=  to  do
  70.   º
  71. [forb | for statement]
  72. for | :=  to do begin
  73.   º
  74. end;
  75.  
  76. [function | function declaration]
  77. function |(): ;
  78. begin
  79.  
  80. end;
  81.  
  82. [ifs | if (no begin/end)]
  83. if | then
  84.   º
  85. [ifb | if statement]
  86. if | then begin
  87.   º
  88. end;
  89.  
  90. [ife | if then (no begin/end) else (no begin/end)]
  91. if | then
  92.   º
  93. else
  94.  
  95. [ifeb | if then else]
  96. if | 
  97. then begin
  98.   º
  99. end
  100. else begin
  101.  
  102. end;
  103.  
  104. [procedure | procedure declaration]
  105. procedure º|();
  106. begin
  107.   
  108. end;
  109.  
  110. [trye | try except]
  111. try
  112.   º|
  113. except
  114.  
  115. end;
  116.  
  117. [tryf | try finally]
  118. try
  119.   º| 
  120. finally
  121.  
  122. end;
  123.  
  124. [trycf | try finally (with Create/Free)]
  125. º := T|.Create; 
  126. try
  127.  
  128. finally
  129.   º.Free;
  130. end;
  131.  
  132. [whileb | while statement]
  133. while | do begin
  134.   º
  135. end;
  136.  
  137. [whiles | while (no begin)]
  138. while | do
  139.  
  140. [withb | with statement]
  141. with | do begin
  142.   º
  143. end;
  144.  
  145. [withs | with (no begin)]
  146. with | do
  147.   º
  148.