Page 1 of 1

Problem to insert table in TDBSRichEditView

Posted: Tue Oct 21, 2014 9:09 pm
by alexandreq
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

Posted: Wed Oct 22, 2014 7:36 am
by Sergey Tkachenko
What is the type of spbTabelas?
Are you sure it is not nil?

Posted: Wed Oct 22, 2014 8:44 am
by alexandreq
spbTabelas is a name of my speedbutton

Posted: Wed Oct 22, 2014 9:34 am
by Sergey Tkachenko
Can you tell which line of RichViewActions or TRichView code generates the error?

Posted: Wed Oct 22, 2014 9:53 am
by alexandreq
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;

Posted: Fri Oct 24, 2014 10:17 am
by Sergey Tkachenko
May be the error happens in your code, in OnSelect event?