Вот так:
Library Имя_Библиотеки;
Uses SysUtils, Classes;
Function Имя_Функции1(Параметр1:Тип1, Параметр2:Тип2, ... ):Тип; StdCall;
Begin
Result := Возвращаемый_Результат;
End;
Function Имя_Функции2(Параметр1:Тип1, Параметр2:Тип2, ... ); StdCall;
Begin
End;
Exports
Имя_Функции1, Имя_Функции2, ...;
Begin
End.
И вместо типа String юзай тип PChar.