Witam, mam taki problem, moja funkcja niemoże znaleźć wskaźnika w bibliotece o to kod tej procedurki
procedure TForm1.Button1Click(Sender: TObject);
var
DLL : THandle;
BOT : function(text:pansichar) : pchar;
LibraryAdress : string;
Text : String;
Zapytanie : String;
INI : TINIFile;
begin
INI := TINIFile.Create(extractfiledir(paramstr(0)) + '\plugins.ini');
LibraryAdress := '\google.dll';
DLL := LoadLibrary(pchar(libraryadress)); // załadowanie pliku
try
@BOT := GetProcAddress(DLL, 'BOT()'); // pobranie wskaźnika do procedury
if @BOT = nil then raise Exception.Create('Błąd');
BOT(pchar(text)); // wykonanie procedury
finally
FreeLibrary(DLL);
end;
end;
Czemu to niechcę działać ? Z górę dzięki z odpowiedź