Function

BeforeLineInvalid

Module

uSpell

Last Modified

7/15/2014 3:26:44 PM

Scope

Local

Local subprogram to

CreateThread

Declaration

function BeforeLineInvalid(Line: string): boolean;

Called-By Hierarchy


                     BeforeLineInvalid
                GetTextFromComponent┘ 
        TMSWordThread.CreateThread┘   
              InternalSpellCheck┘     
TfrmSpellNotify.UMDoSpellCheck┘       

Called-By

Name Declaration Comments
GetTextFromComponent procedure GetTextFromComponent; -


Source

927   function BeforeLineInvalid(Line: string): boolean;
928   var
929     i: integer;
930   begin
931     Result := (trim(Line) = '');
932     if not Result then
933     begin
934       for I := 1 to length(Line) do
935         if pos(Line[i], VALID_STARTING_CHARS) > 0 then exit;
936       Result := True;
937     end;
938   end;