Discussion :

[colorid]

Bonjour à tous,

Dans une fonction développée avec ExpertDLL j'ai besoin de créer provisoirement une image bitmap
Voici le type de fonction

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
 
function ModifieCanvas( Canvas: TCanvas; CanRect: TRect ): Integer;
var
  W,H: Integer;
  BMP:TBitmap;
begin
  W:= CanRect.Right-CanRect.Left;
  H:= CanRect.Bottom-CanRect.Top;
  BMP:= TBitmap.Create;
  try
//  faitquelquechose;
  finally
    BMP.Free;
  end;
  result:= W*H;
end;

Le code source de la DLL ne reconnait pas Tbitmap.Create
J'utilise TBitmap car j'ai besoin d'utiliser la fonction ScanLine sui n'existe pas dans TCanvas

Quelqu'un a-t'il une idée ?

Bon apres midi à tous

[Andnotor]

Ajoute Graphics au uses.

[colorid]

Graphics est déjà déclaré dans les uses

D'ailleurs dans cette DLL j'ai déclaré d'autres fonctions qui travaillent sur des paramètres TCanvas sasn poser aucun problème.

D'ailleurs la déclaration dans Var de BMP: TBitmap ne me signale aucune erreur alors que sur la ligne BMP:= Tbitmap.Create; la fonction .create est soulignée en rouge avec à la compilation l'erreur "E2003 : Identificateur non déclaré : 'Create'"

As-tu une autre idée ?

[Andnotor]

Alors c'est que tu as un type record déclaré comme... TBitmap:

Code :

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

1
2
3
4
type
  TBitmap = record
    ...
  end;

Passe ta souris dessus pour voir où il est déclaré.
Ensuite, si tu es responsable , renomme-le! Sinon modifie l'ordre des uses.

[colorid]

sur la TBitmap de la déclaration dans var

tagTBIMAPtype
TBitmap - =Windows.tagBITMAP

sur la ligne TBitmap.Create

identificateur TBitmap non déclaré

[Andnotor]

Comme je te dis, change l'ordre du uses.
C'est le type trouvé dans la dernière unité déclarée qui est utilisé.

Code :

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

1
2
3
4
5
6
 
//Juste
uses Windows, Graphics;
 
//Faux
uses Graphics, Windows;