Casa
Top.Mail.Ru Yandeks.Metrika
Foro: "Principal";
Archivo actual: 2002.01.08;
Descargar: [xml.tar.bz2];

abajo

De nuevo, el problema con el texto: muestro Image1.Canvas.TextOut, pero debajo del texto mismo hay un corredor blanco. ¿Es posible que si no elimina (solo coloque las letras), al menos haga que el corredor sea negro? Encontrar ramas similares


Serg5   (2001-12-20 14:57) [0]

Ese es todo el punto ...



MBo   (2001-12-20 15:18) [1]

hacer
Canvas.Brush.Style:=bsbsar;



Serg5   (2001-12-20 17:40) [2]

MBo, ayudado, brillante!



MBo   (2001-12-20 17:48) [3]

No necesita emociones, presione F1;)



Serg5   (2001-12-20 18:16) [4]

¿Por qué los ingleses sabrían cómo es ruso?
hubo un problema (si aún no me hubieran molestado con mis preguntas :() ... No sé qué hacer, la tarea es imprimir en letras negras si el sustrato es blanco y viceversa con letras blancas sobre un fondo negro. Pero el fondo es como en la foto, es decir, no es uniforme. Puedo comparar un píxel de esa área, si es negro, entonces la imagen es clara. Pero también puedes encontrar un píxel brillante por error o tomar el área completa (20 * 100px, multiplicar, dividir, determinar el color promedio) ...
¿Hay alguna forma de comparar el código de color, es más brillante o más oscuro que el valor de gris promedio?



Юрий Федоров   (2001-12-20 21:21) [5]

En general, SetRop2 se usa comúnmente para esto.



Serg5   (2001-12-21 08:57) [6]

Yuri Fedorov, ¿y qué es esto? Torrey no dio ningún resultado. QT se refiere a Yandex .. es un paquete?



MBo   (2001-12-21 09:54) [7]

SetRop2 es una función API que establece cómo se mezclan los colores al superponer gráficos. Nuevamente, F1, si la ayuda del SDK vale la pena.

Prueba esto

procedimiento TForm1.Button1Click (Sender: TObject);
var b: tbitmap;
r: trect;
comenzar
r: = image1.clientrect;
b: = tbitmap.create;
b.width: = image1.Width;
b.height: = image1.height;
con b.canvas empezar
fuente: = image1.Canvas.font;
Brush.Color: = clBlack;
fillrect (r);
Brush.Style:=bsClear;
font.color: = clWhite;
TextOut (5,5, "XorPut");
fin;
image1.picture.LoadFromFile ("e: \ camera1.bmp");
image1.canvas.copymode: = cmSrcInvert;
image1.canvas.copyrect (r, b.canvas, r);
b.free;
fin;



Páginas: 1 rama entera

Foro: "Principal";
Archivo actual: 2002.01.08;
Descargar: [xml.tar.bz2];

arriba









Memoria: 0.58 MB
Tiempo: 0.026 c
14-22353
Esmerejón
2001-11-02 10:13
2002.01.08
Estoy sorprendido


1-22023
Delphig
2001-12-13 03:13
2002.01.08
Conmigo fuera de tema ¿Para qué sistema operativo Delphi funciona mejor?


1-22221
Agrio
2001-12-16 21:00
2002.01.08
Recursos


4-22460
Dimich
2001-11-01 08:49
2002.01.08
Personas AYUDA !!! Disher quema !!!


14-22396
Esmerejón
2001-11-02 09:54
2002.01.08
¡Hoy es un día feliz! Además de eso, el viernes ...





africaans albanés Arabic armenio Azerbaiyán vasco Bielorruso Bulgarian Catalán Chino (simplificado) Chino (tradicional) Croata Checo Danés Dutch Inglés Estonia filipina Finnish Francés
gallego georgiano Alemán Griego criollo haitiano hebreo hindi Húngaro islandés Indonesian irlandés Italiana Japonés Korean letón lituano macedonio Malay maltés Noruego
persa polaco Portuguese rumano Ruso Serbio Slovak Esloveno Español swahili Sueco Thai turco ucranio Urdu vietnamita galés yídish bengalí bosnio
cebuano esperanto gujarati hausa hmong igbo javanés kannada khmer lao latín maorí marathi mongol nepali punjabi somalí Tamil telugu yoruba
zulú
Английский Francés Alemán Italiano portugués Русский Español