2 pièce(s) jointe(s)
TPNGImage : ne s'affiche pas
Bonjour,
Je cherche à afficher des images de type PNG dans un composant TImage (tuiles pour une carte en pseudo-3D isométrique). Parmi les 4 tuiles, une seule s'affiche (ocean.png). Je ne comprends pas pourquoi.
Code:
1
2
3
4
5
6
7
8
9
10
11
12
| Ocean := TPNGImage.Create;
Ocean.LoadFromFile(CurrentDir + '/images/ocean.png');
Grass := TPNGImage.Create;
Grass.LoadFromFile(CurrentDir + '/images/grass.png');
Mountains := TPNGImage.Create;
Mountains.LoadFromFile(CurrentDir + '/images/mountains.png');
Desert := TPNGImage.Create;
Desert.LoadFromFile(CurrentDir + '/images/desert.png');
imgMap.Canvas.Draw(i, j, Ocean);
imgMap.Canvas.Draw(i, j, Grass); // Ne s'affiche pas
imgMap.Canvas.Draw(i, j, Mountains); // Ne s'affiche pas |
