Re: List index out of bounds (0).

Return to index

Author

Message

laura cordova

Posted: 05/29/2003 18:48:26

I have assigned the style, to the moment of the error sends me to the form

of RVEdit, in the following code

procedure TCustomRichViewEdit.ApplyStyleConversion(UserData: Integer);

begin

  {$IFNDEF RVDONOTUSEINPLACE}

  if (InplaceEditor<>nil) and (InplaceEditor is TCustomRichViewEdit) then

begin

    TCustomRichViewEdit(InplaceEditor).ApplyStyleConversion(UserData);

    exit;

  end;

  {$ENDIF}

  if Assigned(FOnStyleConversion) and BeforeChange(False) then begin

    FCurStyleConversion := FOnStyleConversion;

    TRVEditRVData(RVData).ApplyStyleConversion_(UserData);

  end;

end;

Yoerdes <[email protected]> wrote:

>Do you have a style assigned to the RichViewEdit?

>I got these messages when I forgot to assign one.

>

>Yoerdes

>

>Laura Cordova wrote:

>> I have a problem. When I try to write in the TRchviewEdit, it presents

me

>> the following message List index out of bounds (0). and one doesn't eat

to

>> fix it.

>