Club Builder - Foros de discusión Club Builder
Foro de C++Builder en español
 
 FAQFAQ   BuscarBuscar   MiembrosMiembros   Grupos de UsuariosGrupos de Usuarios   RegistrarseRegistrarse 
 PerfilPerfil   Entra para ver tus mensajes privadosEntra para ver tus mensajes privados   EntrarEntrar 

QRRichText y negrita

 
Publicar nuevo tema   Responder al tema    Foros de discusión -> Consultas
Ver tema anterior :: Ver tema siguiente  
Autor Mensaje
Mensaje    Asunto: QRRichText y negrita Responder citando

Estaba tratando de adaptar el código de un hilo de otro foro (Cómo poner QRRichText en negrita) para una aplicación en C++ Builder 6. Lo he dejado así:
Función
Código:
void Negrita(TRichEdit *Rich, AnsiString Texto)
{
     int nPos = Rich->FindText(Texto, 0, 1000, TSearchTypes() << stMatchCase);

     Rich->SelStart  = nPos;
     Rich->SelLength = Texto.Length();
     Rich->SelAttributes->Style << fsBold;
}
//---------------------------------------------------------------------------

Y para usarlo pongo esto:
Código:
Negrita(fCarSoc->RichText->ParentRichEdit, Label10->Caption);

Se compila sin problema, pero al ejecutarlo me da un mensaje de error:


He comprobado con el depurador que ParentRichEdit aparece como NULL. ¿Qué estoy haciendo mal?
_________________
Un saludo

Necesitamos tu ayuda: Envía AI al 27595 (Coste 1,20 euros + IVA)
Volver arriba
Ver perfil de usuario Enviar mensaje privado Enviar email
Mensaje    Asunto: Responder citando

Código:

void Negrita(TRichEdit *Rich, AnsiString Texto)
{
  if(!Rich) return;
  int nPos = Rich->FindText(Texto, 0, Rich->Text.Length(), TSearchTypes()<< stMatchCase);
  Rich->SetFocus();
  Rich->SelStart  = nPos;
  Rich->SelLength = Texto.Length();
  TFontStyles Style = Rich->SelAttributes->Style;
  Rich->SelAttributes->Style = Style << fsBold;
  Rich->SelLength = 0;
  Rich->SelAttributes->Style = Style;
}


Acuérdate de pasar un puntero válido a un TRichEdit.


Saludos.
Volver arriba
Ver perfil de usuario Enviar mensaje privado
Mensaje    Asunto: Responder citando

Gracias por responder escafandra. Mientras ponías la respuesta me han dado la solución en Foros Club Delphi. La he subido a Tips &Tricks.
_________________
Un saludo

Necesitamos tu ayuda: Envía AI al 27595 (Coste 1,20 euros + IVA)
Volver arriba
Ver perfil de usuario Enviar mensaje privado Enviar email
Mostrar mensajes de anteriores:   
Cambiar a:  
No puedes publicar temas nuevos en este foro
No puedes responder a temas en este foro
No puedes editar tus mensajes en este foro
No puedes borrar tus mensajes en este foro
No puedes votar en las encuestas de este foro


Hosting WordPress Indedmedia desde 3,99 €
© 2002–2026 Club Builder · Funciona con phpBB.