home *** CD-ROM | disk | FTP | other *** search
/ PC World 2002 May / PCWorld_2002-05_cd.bin / Software / TemaCD / pspad / Context / Pascal.DEF < prev    next >
Encoding:
Text File  |  2001-08-12  |  2.2 KB  |  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. ; 
  10. ; hlaviΦka p°φkazu je uzav°ena do [], znak | slou₧φ jako odd∞lovaΦ
  11. ; jmΘna p°φkazu a komentß°e. 
  12. ; * urΦuje nepovinnou klßvesovou zkratku
  13. ; pokud °ßdek p°φkazu obsahuje znak |, kurzor se po vlo╛enφ do
  14. ; textu zastavφ na tomto mφst∞
  15. ; pokud °ßdek p°φkazu obsahuje znak º, bude zde vlo₧en oznaΦen² text
  16. ;
  17. ; autor: Borand - p°evzato z Delphi5
  18. ; poslednφ revize 12.8.2001
  19. ;
  20. [arrayd | array declaration (var)]
  21. array[0..|] of ;
  22.  
  23. [arrayc | array declaration (const)]
  24. array[0..|] of = ();
  25.  
  26. [cases | case statement]
  27. case | of
  28.   : ;
  29.   : ;
  30. end;
  31.   
  32. [casee | case statement (with else)]
  33. case | of
  34.   : ;
  35.   : ;
  36. else ;
  37. end;
  38.   
  39. [classf | class declaration (all parts)]
  40. Tº| = class(T)
  41. private
  42.  
  43. protected
  44.  
  45. public
  46.  
  47. published 
  48.  
  49. end;
  50.  
  51. [classd | class declaration (no parts)]
  52. Tº| = class(T)
  53.  
  54. end;
  55.  
  56. [classc | class declaration (with Create/Destroy overrides)]
  57. Tº| = class(T)
  58. private
  59.  
  60. protected
  61.  
  62. public
  63.   constructor Create; override;
  64.   destructor Destroy; override;
  65. published 
  66.  
  67. end;
  68.  
  69. [fors | for (no begin/end)]
  70. for | :=  to  do
  71.   º
  72. [forb | for statement]
  73. for | :=  to do begin
  74.   º
  75. end;
  76.  
  77. [function | function declaration]
  78. function |(): ;
  79. begin
  80.  
  81. end;
  82.  
  83. [ifs | if (no begin/end)]
  84. if | then
  85.   º
  86. [ifb | if statement]
  87. if | then begin
  88.   º
  89. end;
  90.  
  91. [ife | if then (no begin/end) else (no begin/end)]
  92. if | then
  93.   º
  94. else
  95.  
  96. [ifeb | if then else]
  97. if | 
  98. then begin
  99.   º
  100. end
  101. else begin
  102.  
  103. end;
  104.  
  105. [procedure | procedure declaration]
  106. procedure º|();
  107. begin
  108.   
  109. end;
  110.  
  111. [trye | try except]
  112. try
  113.   º|
  114. except
  115.  
  116. end;
  117.  
  118. [tryf | try finally]
  119. try
  120.   º| 
  121. finally
  122.  
  123. end;
  124.  
  125. [trycf | try finally (with Create/Free)]
  126. º := T|.Create; 
  127. try
  128.  
  129. finally
  130.   º.Free;
  131. end;
  132.  
  133. [whileb | while statement]
  134. while | do begin
  135.   º
  136. end;
  137.  
  138. [whiles | while (no begin)]
  139. while | do
  140.  
  141. [withb | with statement]
  142. with | do begin
  143.   º
  144. end;
  145.  
  146. [withs | with (no begin)]
  147. with | do
  148.   º
  149.