Тогда нужно пробовать разные варианты:
Код:
Label1.Caption := IntToStr(MyFunc());
или
Label1.Caption := FloatToStr(MyFunc());//хм
или
if Assigned(@MyFunc) then
begin
MyFunc(w);
Label1.Caption:=IntTostr(w);
end else...
Может есть хоть описание для ДЛЛ, проект (его идея) откуда-то взялся.