[VCL] TBitmap.Canvas.CopyRect : bugs connus ?!

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : [VCL] TBitmap.Canvas.CopyRect : bugs connus ?!

Moustaaki

.: ILITCH :. ésprit sibérie

bonjour !

j'utilise cette fonction assez souvent dans mon prog et il arrive à peu près une fois sur 50 que le copy rect ne copie rien du tout....

pour vous situer un peu la chose, ouala à quoi ressemble mon ti code :

Code :

with bmpScroll do begin
Height := BMP_HEIGHT;
width := BMP_WIDTH*bmpList.Count;
end;
with destRect do begin
Top := 0;
Bottom := BMP_HEIGHT;
end;
sourceRect := destRect;
with sourceRect do begin
Top := 0;
Bottom := BMP_HEIGHT;
Left := 0;
Right := BMP_WIDTH;
end;
// le scroll se limite aux nbMax dernières passes.
if bmpList.count-1 > nbMax then i := (bmpList.count-1)-nbMax
else i := 0;
for i:=i to bmpList.Count - 1 do begin
with destRect do begin
Left := i*BMP_WIDTH;
Right := Left + BMP_WIDTH;
end;
bmpScroll.Canvas.CopyRect(destRect, TBitmap(bmpList.Items[i]).Canvas, sourceRect);
end;

j'ai vérifié que bmpList.Items contenait bien des bitmap "valide" et c'est bel est bien le cas. Il n'y a aucun doute, c'est CopyRect qui foire... vs avez déjà vu ça ??!!

notez que ce phénomène arrive bp plus souvent sur winXP, un petit peu moins sous Win2K et quasiment jamais sous win98...

Publicité

taureau

procedure TCanvas.CopyRect(const Dest: TRect; Canvas: TCanvas;
const Source: TRect);
begin
Changing;
RequiredState([csHandleValid, csFontValid, csBrushValid]);
Canvas.RequiredState([csHandleValid, csBrushValid]);
StretchBlt(FHandle, Dest.Left, Dest.Top, Dest.Right - Dest.Left,
Dest.Bottom - Dest.Top, Canvas.FHandle, Source.Left, Source.Top,
Source.Right - Source.Left, Source.Bottom - Source.Top, CopyMode);
Changed;
end;

voici le code de CopyRect il emballe l'appel à l'api windows en s'assurant que les handle sur les objets graphiques sont valides, donc si ça marche pas c peut-etre qu'a ce moment ils sont pas bon, regarde en utilisant directement l'api...

Moustaaki

.: ILITCH :. ésprit sibérie

bon, déjà, c'est pas le RequiredState, puisque ça me renverrerais une exception et ce n'est pas le cas .
Sinon, en lisant la doc, j'ai vu que BitBlt était plus adapté à mes besoin que StretchBlt (surface dest et source de taille identique). J'utilise donc cette fonction directement.
Mais j'ai toujours le même pb : BitBlt n'échoue jamais (renvoie toujours true) mais la surface n'est pas toujours copiée...
Dans une autre partie de l'application, j'utilise TransparentBilt (pour supprimer une couleur sur un bitmap) et j'ai exactement le même problème et ce une fois sur 20 a peu près...
bon, je vais encore chercher mais si vous avez une idée, n'hésitez surtout pas ! :jap:

newik1

Je relance cette discution car j'ai actuellement le même problème.
Y a-t-il une solution?

FORUM HardWare.fr

Programmation

Delphi/Pascal

[VCL] TBitmap.Canvas.CopyRect : bugs connus ?!

Sujets relatifs
[Delphi] J'aurai besoin d'un VCL permettant de compresser des fichiers	Applet plein de bugs d'affichage...
Comment faire une scrollbar pour un type Canvas ?	Faire une scrollbar dans un Canvas
Probleme d'affichage de Canvas dans un panel	[BORLAND]Dérivation de TBitmap
canvas resize	peut on enegistrer un canvas en image jpg ou bmp ?
[mac / ie] cherche site répertoriant les bugs et freezes	Affectation d'un HPALETTE à un TBitmap
Plus de sujets relatifs à : [VCL] TBitmap.Canvas.CopyRect : bugs connus ?!

Page générée en 0.044 secondes