Problem to insert table in TDBSRichEditView

alexandreq · Post by **alexandreq** » Tue Oct 21, 2014 9:09 pm

Hello Serge

I use Delphi XE4 and my DBSRichEditView version is v5.9.5.

When I insert table in it, I have a violation but I noticed that the problem doesn't occurs in SRichViewEdit.

The code is
rvActionInsertTable1.ShowTableSizeDialog(Editor1.ActiveEditor, spbTabelas);

Could you tell me what should I do?

Thanks
Alex

Post by **Sergey Tkachenko** » Wed Oct 22, 2014 7:36 am

What is the type of spbTabelas?
Are you sure it is not nil?

alexandreq · Post by **alexandreq** » Wed Oct 22, 2014 8:44 am

spbTabelas is a name of my speedbutton

Post by **Sergey Tkachenko** » Wed Oct 22, 2014 9:34 am

Can you tell which line of RichViewActions or TRichView code generates the error?

alexandreq · Post by **alexandreq** » Wed Oct 22, 2014 9:53 am

The first break happens here

procedure TRichViewRVData.DoSelect;
begin
if rvflRoot in Flags then begin
if not (csDestroying in FRichView.ComponentState) and FRichView.HandleAllocated then begin
{$IFDEF RICHVIEWDEF2010}
//CreateSelectionHandles(False);
UpdateSelectionHandles(False);
{$ENDIF}
if Assigned(TCustomRichView(FRichView).OnSelect) then
TCustomRichView(FRichView).OnSelect(TCustomRichView(FRichView));
end;
end
else
inherited DoSelect;
end;

and when I continue, it stops here

function TRVTableInplaceRVData.GetRotation: TRVDocRotation;
begin
Result := GetSourceRVData.GetRotation;
end;

Post by **Sergey Tkachenko** » Fri Oct 24, 2014 10:17 am

May be the error happens in your code, in OnSelect event?