Du musst auch vor der
Exception im CPU-Fenster gucken
Der Code bringt zumindest keine
AV:
Delphi-Quellcode:
function AUDIOFormatIsValid: boolean;
var
Proc1:
function(datei:pwidechar):integer;
stdcall;
Proc2:
function: integer;
stdcall;
Handle: THandle;
begin
Handle:= LoadLibrary(PChar(AudioGenie2dll));
if Handle <> 0
then
begin
Proc1 := GetProcAddress(
Handle, '
AUDIOAnalyzeFile');
Proc2 := GetProcAddress(
Handle, '
AUDIOFormatIsValid');
Proc1('
test.mp3');
Result:= Proc2 = -1;
FreeLibrary(
Handle);
end;
end;
Und wenn ich aus dem "Datei
Char" ein "Datei: PWideChar" mache, dann gibt die Funktion sogar true zurück (Proc1 liefert 1 und Proc2 -1)
Dieser Beitrag ist für Jugendliche unter 18 Jahren nicht geeignet.