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

abajo

Ayuda con los gráficos, por favor :-( Encontrar ramas similares


vbazik   (2001-12-21 13:16) [0]

Dime cómo imponer en la imagen image1: TImage no es un fragmento rectangular de image2: TImage (por ejemplo, del área dentro de un t arbitrario: TPoligon) ¡Gracias!
Quién sabe: lanza enlaces para trabajar con gráficos, es decir giros, costura, transformación, filtrado



MBo   (2001-12-21 14:37) [1]

procedimiento TForm1.Button1Click (Sender: TObject);
var PolyRgn: hRgn;
APolygon: matriz [1..5] de TPoint;
r: trect;
comenzar
image1.Picture.LoadFromFile ("e: \ camera1.bmp");
APolygon [1]: = Punto (0,0);
APolygon [2]: = Punto (30,20);
APolygon [3]: = Punto (50,50);
APolygon [4]: = Punto (20,30);
APolygon [5]: = Punto (0,0);
PolyRgn: = CreatePolygonRgn (APolygon, 5, 0);
SelectClipRgn (image2.Canvas.Handle, PolyRgn);
r: = image1.clientrect;
image2.canvas.copyrect (r, image1.canvas, r);
DeleteObject (PolyRgn);
fin;



vbazik   (2001-12-23 02:17) [2]

> MBo!
Muchas gracias !!! Todo funciona :-))))))



Páginas: 1 rama entera

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

arriba





Memoria: 0.54 MB
Tiempo: 0.012 c
3-28403
Scully
2001-12-07 10:23
2002.01.10
Edición de un campo de tipo Fecha (fecha + hora)


14-28528
Vasiliev P.
2001-11-09 23:01
2002.01.10
Báltico y personas que viven en países extranjeros!


4-28556
cher_gvf
2001-11-09 17:43
2002.01.10
¿Dónde leer sobre hilos y procesos?


4-28553
Eugene
2001-11-07 15:11
2002.01.10
¿Cómo restringir el acceso a los directorios a los usuarios?


14-28539
Tenedor
2001-11-10 19:06
2002.01.10
Apoye el sitio del principiante http://makeitso.vov.ru





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 French
gallego georgiano Alemán Griego criollo haitiano Hebreo hindi Húngaro islandés Indonesian irlandés Italiano 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