Bonjour,

Je suis débutant en delphi et je souhaite travailler avec une dll sur une image affichée à l'ecran dont je ne connais que le Device context.

Ci dessous mon code qui ne fonctionne pas:

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
22
23
24
25
26
27
library Ma;
 
uses
  SysUtils,Controls,Windows,Graphics,ExtCtrls,
  Classes;
 
{$R *.res}
 
  function NbPoint(n : integer):integer; stdcall;
  var DC : HDC;
  Image: TImage;
 
  begin
 
  Image := Timage.Create(Self);
  DC := getdc(n);
  Image.Canvas.Handle := DC;
  Result := Image.Width;
  ReleaseDC(n,DC)
 
  end;
 
exports
        NbPoint;
 
begin
end.
Y a t-il quelqu'un pour me le corriger ?

Merçi