Plusieurs questions sur le dessin

Plusieurs questions sur le dessin - Delphi/Pascal - Programmation

Marsh Posté le 19-08-2004 à 15:40:36    

Bonjour à tous,
 
les vacances finis, bientôt la rentrée, je retourne à mon programme de dessin.
 
Voila: j'ai une surface de dessin de type PNG et je n'arrive pas à dessiner audela de 255 aussi bien pour la coordonnée X et Y. par programmation j'ai donc fait des testes. Je fais un TPngObject, je charge un png de 1024*768 pixels, et je dessine dedans. voir le code ci-dessous pour les testes.
 

Code :
  1. procedure TForm1.Button2Click(Sender: TObject);
  2. var
  3. MonPng : TPNGObject;
  4. begin
  5. MonPng := TPNGObject.create;
  6. MonPng.LoadFromFile('C:\DessinePng\png.PNG');// le png fait 1024*768
  7. MonPng.Pixels[SpinEditCol.Value,SpinEditLine.Value] := clred;
  8.   MonPng.SaveToFile('c:\Dessin.png');
  9.     MonPng.free;
  10.     showmessage(' le png a été sauvegardé en c:\Dessin.png');
  11. end;
  12. end;
  13. end.


le bmp etant trop lourd et le gif est limité en couleur, et le jpeg pas libre de droit, j'utilise le png de cette librairie http://pngdelphi.sourceforge.net/
Kyle_Katarn m'avait conseillé http://www.g32.org mais je ne sais pas l'utiliser.
 
1°) la librairie PNG pré-citée est-elle bugguée si quelqu'un la connait ?
2°) c'est quoi l'image d'avant plan et d'arriere plan comme dans paint ou photoshop, et c'est quoi l'interet des deux images ?
3°) (en fonction de la reponse n°2)si ça a un interet, comment on y accede en programmation?
 
 
Merci


Message édité par coline le 19-08-2004 à 15:43:14
Reply

Marsh Posté le 19-08-2004 à 15:40:36   

Reply

Marsh Posté le 19-08-2004 à 15:55:59    

1) normalement elle fonctionne bien
 
pour le 2 et 3 je ne sais pas
 
dans l'exemple ici quel est le problème ? ça foire avec des valeurs de plus de 255 ?


---------------
mes programmes ·· les voitures dans les films ·· apprenez à écrire
Reply

Marsh Posté le 19-08-2004 à 16:10:41    

merci pour ta reponse antp,
 
en fait si je fais :
 MonPng.Pixels[230,10] := clred; //ok
MonPng.Pixels[255,10] := clred; //ne marche pas , le point n'est pas dessiné alors que le png de base fait 1024*768 dans paint de XP

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed