Discussion :

[inspecteur rick]

Salut

J'ai un gros souci avec la compilation en utilisant pngimage avec delphi XE :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
{Copy interlaced images with 1 byte for R, G, B}
procedure TChunkIDAT.CopyInterlacedRGB8(const Pass: Byte;
  Src, Dest, Trans{$IFDEF Store16bits}, Extra{$ENDIF}: pChar);
var
  Col: Integer;
begin
  {Get first column and enter in loop}
  Col := ColumnStart[Pass];
  Dest := pChar(Longint(Dest) + Col * 3);
  repeat
    {Copy this row}
ici -->    Byte(Dest^) := fOwner.GammaTable[pByte(Longint(Src) + 2)^]; inc(Dest);
    Byte(Dest^) := fOwner.GammaTable[pByte(Longint(Src) + 1)^]; inc(Dest);
    Byte(Dest^) := fOwner.GammaTable[pByte(Longint(Src)    )^]; inc(Dest);

    {Move to next column}
    inc(Src, 3);
    inc(Dest, ColumnIncrement[Pass] * 3 - 3);
    inc(Col, ColumnIncrement[Pass]);
  until Col >= ImageWidth;
end;

Avec l'erreur : la partie gauche n'est pas affectable.

Si j'ai compris c'est un problème de PChar et de PansiChar, mais il y a 57 erreurs, je sais pas trop pourquoi, on n'est pas censé modifier les .pas intégrés à delphi, non ?
Et puis je ne sais pas ce que je dois modifier. Une idée ?

Merci

[Paul TOTH]

A priori tu utilises une version de TPNGImage non livrée avec Delphi qui n'est pas à jour.

[inspecteur rick]

Ah, dans ce cas, avec delphi xe, où puis je trouver une version de pngimage qui soit compatible ?

[Andnotor]

Ah, dans ce cas, avec delphi xe, où puis je trouver une version de pngimage qui soit compatible ?

Elle y est intégrée depuis D2009

[CapJack]

À ce que j'en sais, c'est inclus dans Delphi, CodeGear/Embarcadero ayant acquis les droits !

Il suffit d'ajouter pngimage à la clause uses. Elle s'ajoute d'ailleurs automatiquement quand on charge un .png dans un TImage en mode conception.

Au cas où tu utiliserais un ancien code source TPngImage, supprime - ou zippe, ou déplace - cet ancien code source, enlève sa référence éventuelle du projet, et ainsi le compilateur utilisera l'unité livrée avec Delphi...

Pour Delphi 2009, cette unité est dans C:\Program Files (x86)\CodeGear\RAD Studio\6.0\lib ou C:\Program Files\CodeGear\RAD Studio\6.0\lib. Vérifie pour Delphi XE, je ne connais pas le chemin.

Edit : zut ! grillé !

[inspecteur rick]

Je suis une merde, j'avais rajouté une source à la bibliothèque qui contenait un vieux pngimage !!!

Merci de m'avoir mis sur la piste