[Lazarus] SynEdit1.SearchReplace(

[CML Christian Hartnick]

Sorry for the quick add-on:

In lazarus seems to be the same error too. (I think it is using the same 
component).

Christian

Am 26.05.2014 17:42, schrieb CML Christian Hartnick:
> Hi,
>
> this is my first post on this list. I'm a former Delphi programmer now 
> using lazarus. I'm writing an html generator and using the synedit 
> component.
>
> When I'm searching and/or replacing with the 
> "SynEdit1.SearchReplace()" function, there is a strange behavior if 
> the search string is #10 (to search a word at the beginning/end). The 
> function selects not only the linefeed - it selects the whole line 
> above, too. In case of an replacement the line will be deleted!
>
> procedure TfrmMain.ReplaceDialog1Replace(Sender: TObject);
> var srOptions: TSynSearchOptions;
> begin
>   srOptions:=[ssoReplace,ssoPrompt];
>   if not (frDown    in ReplaceDialog1.Options) then 
> Include(srOptions,ssoBackwards);
>   if (frMatchCase   in ReplaceDialog1.Options) then 
> Include(srOptions,ssoMatchCase);
>   if (frWholeWord   in ReplaceDialog1.Options) then 
> Include(srOptions,ssoWholeWord);
>   if (frReplaceAll  in ReplaceDialog1.Options) then 
> Include(srOptions,ssoReplaceAll);
>   if (frEntireScope in ReplaceDialog1.Options) then 
> Include(srOptions,ssoEntireScope);
> SynEdit1.SearchReplace(ReplaceDialog1.FindText,ReplaceDialog1.ReplaceText,srOptions); 
>
> end;
>
> thanx
>
> Christian
>
> -- 
> _______________________________________________
> Lazarus mailing list
> Lazarus at lists.lazarus.freepascal.org
> http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
>