 |
Club Builder
Foro de C++Builder en español
|
| Ver tema anterior :: Ver tema siguiente |
| Autor |
Mensaje |
Jumanor
Lt
Registrado: 28 Feb 2003Mensajes: 91Ubicación: tacna-Peru
|
 Publicado: Vie 22 Ago, 2003 11:17 pm Asunto: fuente en ListBox |
 |
|
holas:
Tengo un problema con la Fuente de un ListBox
es decir:
Quiero cambiar la Fuente,digamos el tamaño, de una sola linea determinada y despues continuar con otra tamaño.
He intemtado con
ListBox-Font-Size=8;
pero me cambia toda la fuente del ListBox.
Gracias por su enorme ayuda |
|
| Volver arriba |
|
 |
_Viktor
Master
Registrado: 20 Jul 2003Mensajes: 463Ubicación: Santiago, Los Angeles - Chile
|
| Publicado: Jue 28 Ago, 2003 7:00 am Asunto: |
|
|
Encontre este codigo por ahi y me acorde de tu duda, espero te sirva, obviamente tendras q modificarlo un poco para lo que necesites, se ve algo asi finalmente:
| Código: |
//---------------------------------------------------------------------------
void __fastcall TForm1::FormCreate(TObject *Sender)
{
// Fill out the control with the fonts of the computer
for(int i = 0; i < Screen->Fonts->Count; i++)
{
ListBox1->Items->Add(Screen->Fonts->Strings[i]);
ComboBox1->Items->Add(Screen->Fonts->Strings[i]);
}
int F = ComboBox1->Items->IndexOf("Times New Roman");
if( F ) // If the font exists, select it
ComboBox1->ItemIndex = F;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::ListBox1DrawItem(TWinControl *Control, int Index,
TRect &Rect, TOwnerDrawState State)
{
if( State.Contains(odSelected) )
ListBox1->Canvas->Brush->Color = clHighlight;
else
ListBox1->Canvas->Brush->Color = clWhite;
ListBox1->Canvas->FillRect(Rect);
ListBox1->Canvas->Pen->Color = clWhite;
ListBox1->Canvas->Font->Name = ListBox1->Items->Strings[Index];
ListBox1->Canvas->Font->Size = 12;
ListBox1->Canvas->TextOut(Rect.Left, Rect.Top, ListBox1->Items->Strings[Index]);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::ComboBox1DrawItem(TWinControl *Control, int Index,
TRect &Rect, TOwnerDrawState State)
{
if( State.Contains(odSelected) )
ComboBox1->Canvas->Brush->Color = clHighlight;
else
ComboBox1->Canvas->Brush->Color = clWhite;
ComboBox1->Canvas->FillRect(Rect);
ComboBox1->Canvas->Font->Name = ComboBox1->Items->Strings[Index];
ComboBox1->Canvas->Font->Size = 12;
ComboBox1->Canvas->TextOut(Rect.Left, Rect.Top-2, ComboBox1->Items->Strings[Index]);
}
//---------------------------------------------------------------------------
|
Ambos deben tener un estilo "owner draw"
El listbox lbOwnerDrawFixed
El combobox csOwnerDrawFixed
Espero te sirva....
_________________
"Ser inteligente no es ser mas, solo equivocarse menos y no usar Visual Basic"
Atte.
Victor Yañez
Apoyen el Proyecto OpenSource del Club Builder. Ya tenemos componentes Listos!!! |
|
| Volver arriba |
|
|
|
|
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
|
© 2002–2026 Club Builder · Funciona con phpBB.
|
FAQ
Buscar
Miembros
Grupos de Usuarios
Registrarse
Perfil
Entra para ver tus mensajes privados
Entrar
