Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Gráficos
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

 
 
Herramientas Buscar en Tema Desplegado
  #3  
Antiguo 17-04-2009
Avatar de Lord Delfos
Lord Delfos Lord Delfos is offline
Miembro
 
Registrado: ene 2008
Ubicación: Tandil, Argentina
Posts: 558
Poder: 17
Lord Delfos Va por buen camino
Hola coso. Gracias por contestar.

En realidad el código es de lo más simplón. Por ejemplo, una de las cosas que probé para ver qué pasaba (recito de memoria, porque estoy en un ciber y no tengo el código):

Código Delphi [-]
 
var Bmp: TBitmap;
     X, Y: Integer;
 
 
Bmp:= TBitmap.Create;
Bmp.LoadFormFile('c:\algo.bmp'); //que mide 18x18
Bmp.Canvas.Brush.Color:= clBlack;
Bmp.Canvas.Rectangle(0, 0, 17, 17);
 
for X:= 0 to 17 do
  for Y:= 0 to 17 do
    Bmp.Canvas.Pixel:= clWhite;

Bmp.SaveToFile('c:\algo.bmp');
Bmp.Free;

Y el pixel (0, 0) es clBlack, en vez de clWhite... El pixel (1, 0) es, increíblemente, clWhite.
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
¿Pixels no son pixels en todas las configuraciones? elcigarra Gráficos 0 27-01-2006 14:38:05
Tcanvas mejorado eliash Gráficos 6 10-01-2006 10:47:13
tcanvas alineado a la derecha rebollo75 Impresión 2 30-11-2005 18:45:33
Problemas al guardar la posicion de una ventana en el registro neon Varios 1 21-10-2004 11:01:15
Alternativa a TCanvas.StretchDraw Jose_Pérez Gráficos 2 17-04-2004 16:01:13


La franja horaria es GMT +2. Ahora son las 15:56:08.


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
Copyright 1996-2007 Club Delphi