Problème BackEventLog advapi32.dll
Bonjour,
J'ai un probleme avec mon programme et je ne vois pas d'ou vient le probleme, je veux utiliser une fonction contenu dans la dll advapi32.dll mais quand j'execute le programme ça me met l'erreur suivante :
Citation:
Le point d'entrée de procédure BackupEventLog est introuvable dans la bibliotheque de liaisons dynamique advapi32.dll
Code:
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
28
29
30
31
32
33
34
35
36
37
38
| unit Unit1;
{$mode objfpc}{$H+}
interface
uses
Classes, SysUtils, LResources, Forms, Controls, Graphics, Dialogs, Buttons, windows;
type
{ TForm1 }
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ private declarations }
public
{ public declarations }
end;
Function BackupEventLogA (hEventLog : long; lpBackupFileName : String) : Long; stdcall; external 'advapi32.dll' name 'BackupEventLog';
var
Form1: TForm1;
implementation
{ TForm1 }
procedure TForm1.Button1Click(Sender: TObject);
begin
end; |
Merci de votre aide
