Hi,
I found the answer. Sorry if I was too rushed in putting out the question but here is the answer anyway. Maybe someone else will find it useful :)
library MyDLL;
...
procedure ShowLibraryPath;
var
Buffer: Array[0..260] of Char;
begin
GetModuleFileName(hInstance, Buffer, Length(Buffer));
ShowMessage(Buffer);
end;