Oddest error on L or l key stroke OR ALT + L or l

[jgkoehn]

I have a reproduceable error in TRichViewEdit with the L or lowercase l in
My 3 TRichViewEdits that are in my application.
The main TRichView, The footnote TRichView and another I use. All of them have this error.
The application uses the ActionTest Demo as a base (which does not have this error) .
I am programming in Lazarus 2.0.8 my other edit controls do not have this error.

[jgkoehn]

I had put ALT+L to another shortcut. So I removed that because I noticed in the original if you pressed ALT + L twice it brought up language box.
But on mine I seem to have lost this connection. I checked for the shortcut input in the original and could not find it so I'm not sure if this is the problem and where to put it. The error still remains.

[jgkoehn]

Here is the application: By the way Sergey I'm getting some results with a find/replace for regex thanks again. I have a ways to go but you can see it in here.
In regards to the L error just type in the main Edit area.
https://drive.google.com/file/d/1td16_9 ... sp=sharing

[Sergey Tkachenko]

Sorry, what is the error exactly?

I can see, your application adds <link> </link> around the selected text on Alt+L.

[jgkoehn]

Ah yes, I didnt put up the most recent. Hmms.
But if you go to the edit tab in the blue TRichViewEdit and press like abcdl
Every time on l it shows an error on my end. If it does not on yours I would be interested to know. Also on the about tab in the blue TRichViewEdit same thing.
Later today I will capture the error when debugger id on.

[jgkoehn]

Regular error non-debug

[jgkoehn]

Error in debugger error

And here is from the Assembler window:
0055F45A 7426 je 0x55f482 <COMCTRLS$_$TTOOLBUTTON_$__$$_DIALOGCHAR$TLMKEY$$BOOLEAN+114>
0055F45C 8b45f8 mov -0x8(%ebp),%eax
0055F45F 8b80d4020000 mov 0x2d4(%eax),%eax
0055F465 80b8f003000000 cmpb $0x0,0x3f0(%eax)

The error happens on the last part.

However, I just tried it on a new TRichViewEdit with a new RVStyle and the error still happens so maybe it is panel or form related.

[Sergey Tkachenko]

What's your code for processing Alt+L?

TRichView does not add <link> on Alt+L, so it is done in your code.

[jgkoehn]

I will add the new version without my Alt+L I switched it to the shortcut Alt+K it still does this error on the letter L so it appears to be separate.

[jgkoehn]

Here is the latest TotheWord 0.1.9 error is still L or ALt + L now that I moved the other to Alt+K
https://drive.google.com/file/d/1CUhj05 ... sp=sharing

The code for now Alt+K is

Code: Select all

procedure TMainForm.ActionLinkExecute(Sender: TObject);
begin
     MarkupInsert(slinkindic.Text, elinkindic.Text);
end; 

MarkupInsert is. However this should not matter since this is now on Alt + K

Code: Select all

//Code that is used for markups since it is repeated often.
procedure TMainForm.MarkupInsert(StartStr, EndStr: String);
var
  PsiNo, PsiOffs, PeiNo, PeiOffs, StartPos: Integer;
  SelStr: String;
begin
   if RichViewEdit.Focused then
      begin
      SelStr := RichViewEdit.GetSelText;
      RichViewEdit.GetSelectionBounds(PsiNo, PsiOffs, PeiNo, PeiOffs, TRUE);
      RichViewEdit.SetSelectionBounds(PsiNo, PsiOffs,PsiNo, PsiOffs);
      RichViewEdit.InsertText(StartStr,False);
      RichViewEdit.SearchText(SelStr, [rvseoMultiItem, rvseoDown]);
      RichViewEdit.GetSelectionBounds(PsiNo, PsiOffs, PeiNo, PeiOffs, TRUE);
      RichViewEdit.SetSelectionBounds(PeiNo, PeiOffs,PeiNo, PeiOffs);
      RichViewEdit.InsertText(EndStr,False);
   end;
end; 

[jgkoehn]

I finally found the Shortcuts for Mainmenu in Lazarus but I don't see any just L I do see many accelerators I think like short cuts that are Alt+L
Not sure how they could conflict with just L maybe?

[jgkoehn]

Fixed, some how my Toolbarbutton for Insert Hyperlink got off the bar so I didn't see it when I was fixing a previous situation that caused my buttons to no longer be connected. This one was not connected to the rvActionInsertHyperlink1

Sorry for all this, thanks for working with me.