paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-18 13:19:30 +02:00
Code Issues Packages Projects Releases Wiki Activity

codetools: block completion: added example for if then begin else

Browse Source 
git-svn-id: trunk@20688 -
This commit is contained in:
mattias 2009-06-21 10:56:50 +00:00
parent 9650017b1a
commit 51d5f674d6
2 changed files with 13 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
.gitattributes vendored
View File

@ -166,6 +166,7 @@ components/codetools/examples/testscompleteblock/casecolon1.inc svneol=native#te
components/codetools/examples/testscompleteblock/caseelseend1.inc svneol=native#text/plain components/codetools/examples/testscompleteblock/caseelseend1.inc svneol=native#text/plain
components/codetools/examples/testscompleteblock/caseend1.inc svneol=native#text/plain components/codetools/examples/testscompleteblock/caseend1.inc svneol=native#text/plain
components/codetools/examples/testscompleteblock/ifbegin1.inc svneol=native#text/plain components/codetools/examples/testscompleteblock/ifbegin1.inc svneol=native#text/plain
components/codetools/examples/testscompleteblock/ifbeginelse1.inc svneol=native#text/plain
components/codetools/examples/testscompleteblock/procedurebegin1.inc svneol=native#text/plain components/codetools/examples/testscompleteblock/procedurebegin1.inc svneol=native#text/plain
components/codetools/examples/testscompleteblock/procedurebeginend1.inc svneol=native#text/plain components/codetools/examples/testscompleteblock/procedurebeginend1.inc svneol=native#text/plain
components/codetools/examples/testscompleteblock/procedurebeginifbegin1.inc svneol=native#text/plain components/codetools/examples/testscompleteblock/procedurebeginifbegin1.inc svneol=native#text/plain

12
components/codetools/examples/testscompleteblock/ifbeginelse1.inc Normal file
View File

@ -0,0 +1,12 @@
{%MainUnit unit1.pas}
procedure Do1;
begin
if True then
begin
Test() //caret position
else
begin
end;
end;