есть DLL на Delphi:

library Project1;

{$R *.res}

function Delete_File(filename:ShortString):ShortString; cdecl; export;
begin
result:=filename;
end;
exports Delete_File name 'Delete_File';

begin
end.

Функция на Sybase 9:
create function DBA.dll_func(in @filename char(256))
returns char(256) external name 'Delete_File@D:\\Work\\DLL_Project\\Project1.dll'

Вызываю из InterActive:
CREATE PROCEDURE "DBA"."ttt"()
BEGIN
declare @res char(255);
@res=call dll_func( 'C:\1.txt' );
select @res
END

Сервак виснет. Если входные или выходные параметры внешней функции Integer, то работает.
Вопрос: что Я тут неправильно написал?

поменял
function Delete_File(filename:ShortString):ShortString; cdecl; export;
на
function Delete_File(filename:String):PChar; stdcall; export;
всё равно не работает

White OwlНу а параметр функции то почему String?

---
http://www.rusug.ru] Портал русскоязычной группы пользователей Sybase

Заменил String на PChar- всё равно сервак падает.

Dmitry.вот такая ф-я работает:


Заменил PChar на Integer - работает.
Но дело в том, что мне нужно уничтожать файл в функции, в DLL передаётся имя файла.
Файл не удаляется, тогда Я решил проверить а корректно ли передаётся имя файла?
Поэтому решил просто обратно возвратить имя файла из DLL, на возвращаемый PChar параметр Sybase падает.
Как тут быть не знаю.
Пробовал входной и возвращаемый параметр делать char, работает, но возвращает совсем не тот символ, что передавал.
Какая то проблема с кодировкой.
Может нужно как то по особенному писать DLL на Delphi?

Всем спасибо за советы. Для меня всё стало гораздо яснее. :)