Bonjour à tous,
J'essaye de charger dynamique une dll qui exporte une fonction creant une feuille et je me fait jeter le load avec
le code de l'appel est
uses Libc;
type
TCreation_importation=procedure;
THandle=pointer;
var
Handlee:THandle;
Creation_importation:TCreation_importation;
....
....
Handlee:=dlopen(Pchar(chemin),RTLD_LAZY);
if Handlee <> nil then
begin
@Creation_importation:=dlsym(Handlee,'Creation_importation');
if @creation_importation <> nil then
begin
Creation_importation;
end;
dlclose(Handlee);
end;
La procedure dans la dll est
Application.createForm(Timportation,importation);
Est ce que quelqu'un a déjà fait ça ? (c'est la premiere fois que j'essayes )
(je suis sur MAdrake 9 Kylix 2)
Merci d'avance si on peut m'orienter
Partager