From 676016b23748efd87b3b3e1ad6a2e791a8b5fc4d Mon Sep 17 00:00:00 2001 From: Graeme Geldenhuys Date: Thu, 8 Oct 2009 13:37:27 +0200 Subject: code formatting --- components/richtext/RichTextDocumentUnit.pas | 18 +++++------------- 1 file changed, 5 insertions(+), 13 deletions(-) mode change 100644 => 100755 components/richtext/RichTextDocumentUnit.pas diff --git a/components/richtext/RichTextDocumentUnit.pas b/components/richtext/RichTextDocumentUnit.pas old mode 100644 new mode 100755 index 8f94e63b..2f51581b --- a/components/richtext/RichTextDocumentUnit.pas +++ b/components/richtext/RichTextDocumentUnit.pas @@ -64,19 +64,12 @@ Function ExtractTag( Var TextPointer: PChar ): TTag; // Returns tag ending at TextPointer // (Expects textpointer is currently pointing at the >) // and moves TextPointer to the first char of the tag -Function ExtractPreviousTag( const TextStart: PChar; - Var TextPointer: PChar ): TTag; - -function ExtractNextTextElement( TextPointer: PChar; - Var NextElement: PChar ): TTextElement; - -function ExtractPreviousTextElement( const TextStart: PChar; - TextPointer: PChar; - Var NextElement: PChar ): TTextElement; +Function ExtractPreviousTag( const TextStart: PChar; Var TextPointer: PChar ): TTag; +function ExtractNextTextElement( TextPointer: PChar; Var NextElement: PChar ): TTextElement; +function ExtractPreviousTextElement( const TextStart: PChar; TextPointer: PChar; Var NextElement: PChar ): TTextElement; // Parse a color name or value (#hexval). Returns true if valid -function GetTagColor( const ColorParam: string; - var Color: TfpgColor ): boolean; +function GetTagColor( const ColorParam: string; var Color: TfpgColor ): boolean; function GetTagTextAlignment( const AlignParam: string; const Default: TTextAlignment ): TTextAlignment; @@ -350,8 +343,7 @@ begin end; -function ExtractNextTextElement( TextPointer: PChar; - Var NextElement: PChar ): TTextElement; +function ExtractNextTextElement( TextPointer: PChar; Var NextElement: PChar ): TTextElement; var TheChar: Char; NextChar: char; -- cgit v1.2.3-70-g09d2