diff options
author | Graeme Geldenhuys <graemeg@gmail.com> | 2009-10-19 19:57:09 +0200 |
---|---|---|
committer | Graeme Geldenhuys <graemeg@gmail.com> | 2009-10-19 19:57:09 +0200 |
commit | 44a44ce26d15859bdd98b881fc4eeff4186c6917 (patch) | |
tree | 99733e0774124cda9ac6c7101d06b9df4faabff4 | |
parent | 713343bcd5da21a07e8f7ec5ac333927aa1b5bd0 (diff) | |
download | fpGUI-44a44ce26d15859bdd98b881fc4eeff4186c6917.tar.xz |
Minor code formatting.
-rw-r--r-- | src/HelpTopic.pas | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/HelpTopic.pas b/src/HelpTopic.pas index d6ea3ee7..049cb386 100644 --- a/src/HelpTopic.pas +++ b/src/HelpTopic.pas @@ -869,7 +869,7 @@ var OutputString: string; begin EscapeLen := pData^; - EscapeCode := (pData + 1) ^; + EscapeCode := (pData + 1)^; OutputString := ''; case EscapeCode of @@ -908,7 +908,7 @@ begin ecHighlight1: begin - StyleCode := ( pData + 2 ) ^; + StyleCode := ( pData + 2 )^; if StyleCode <= High( IPFHighlight1Tags ) then OutputString := IPFHighlight1Tags[ StyleCode ]; if StyleCode = 0 then @@ -917,7 +917,7 @@ begin ecHighlight2: begin - StyleCode := ( pData + 2 ) ^; + StyleCode := ( pData + 2 )^; if StyleCode <= High( IPFHighlight2Tags ) then OutputString := IPFHighlight2Tags[ StyleCode ]; |