Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   C++ Builder (https://www.clubdelphi.com/foros/forumdisplay.php?f=13)
-   -   StringGrid Rebelde (https://www.clubdelphi.com/foros/showthread.php?t=52706)

EUFORIA 29-01-2008 10:44:58

StringGrid Rebelde
 
for(int i=0;i<lista2->Count;i++){
tabla->Canvas->Brush->Color=clRed;
tabla->Canvas->Font->Color=clWhite;
tabla->Canvas->Font->Style== TFontStyles()<< fsBold;
tabla->Canvas->FillRect(area);
tabla->Canvas->TextOutA(0,tabla->Canvas->TextWidth(lista2->Strings[i]),lista2->Strings);
}


Porque esto no me escribe el texto????:confused:

cHackAll 29-01-2008 21:57:36

Estas definidiendo el color del Brush (background), rojo... y estas definidiendo el color del Font (foreground), rojo! Modifica el color de alguno.

Saludos

EUFORIA 30-01-2008 00:00:01

Opssss
 
No tio, eso es porque he copiado una version de codigo despues de probar hasta lo último.
El texto va en blanco, clWhite, vamos, jejeje, pero no se porque no aparece el texto, a no ser que sea por alguna opcion estraña que se me pasa....ya te digo que he probado incluso todo en rojo ,...:mad:
Me trae de cabeza, si no es la primera vez que coloreo un puto stringgrid, si total es pillar la cademna de un vector de strings y subirlo....

cHackAll 30-01-2008 00:29:21

Vaya, si lo hubieses dicho antes no hubiese cometido ese error :rolleyes:

Entonces voy por otra posibilidad; de seguro que estas realizando el pintado de la StringGrid dentro del evento OnDrawCell verdad?

0j0: DefaultDrawing

Saludos

EUFORIA 30-01-2008 01:13:49

No tio
 
joder... estoy por hecharme a llorar..jejeje
que va tio, es un funcion que llamo cuando le doy a un boton que me compara una cola. La funcion me dice que no hay en la cola, entre otras cosas, y con un for:

[i]for(int i=0;i<lista->Count;i++){
alerta+="No existe el fichero "+lista->Strings[i]+" en el directorio de firmwares operativos\n\r";
tabla->Canvas->Brush->Color=clRed;
tabla->Canvas->Font->Color=clWhite;
tabla->Canvas->Font->Style== TFontStyles()<< fsBold;
tabla->Canvas->FillRect(tabla->CellRect(0,i+1));
tabla->Canvas->TextOutA(0,i,lista2->Strings);
}

imprimo en la 'tablita' los nombre de los ficheros, uno bajo del otro, todo muy bonito, pero ¡¡¡demasaiado rojo!!!!....esos nombres estan en la lista, lo veo en el debug...
Tio 1000 gracias de antemano, seguro que sabes que co... estoy haciendo mal.
:eek:

ucanneo 25-02-2008 07:44:09

Se que quiza a esta altura ya lo hayas solucionado pero parece que en el pedazo de
" tabla->Canvas->Font->Style== TFontStyles()<< fsBold;"


Pues en ves de hacerlo igual estas haciendo una comparcion

parece que tambien en esta parte:

"
tabla->Canvas->FillRect(tabla->CellRect(0,i+1));
tabla->Canvas->TextOutA(0,i,lista2->Strings);
"

Pues empiezas a pintar donde mismo, puesto que i+n es en pixels


saludos y espero no estar divagando yo tambien


La franja horaria es GMT +2. Ahora son las 06:13:40.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi