Есть проблемма нужно строку вида 12.2.3.4 переделать в строку вида
12020304
Пишу DLL

Function PTN(var IN_P:PCHAR):PCHAR; cdecl; export;
VAR
Out_Schet,IN_Schet,Stat:ShortString;
Res:pchar;
begin
In_Schet:=StrPas(In_P);
Out_schet:='';
Res:='';
Repeat
if (Pos('.',In_SCHET)=0) and (Length(In_SCHET)<>0)
then In_SCHET:=In_SCHET+'.';
Stat:='';
Stat:=copy(In_SCHET,1,Pos('.',In_SCHET)-1);
if length(Stat)<2 then Stat:='0'+Stat;
Out_Schet:=Out_Schet+Stat;
In_SCHET:=copy(In_SCHET,Pos('.',In_SCHET)+1,Length(In_Schet));
Until (Pos('.',In_SCHET)=0) and (Length(In_SCHET)=0);
StrPCopy(Res,Out_Schet);
Result:=Res;
end;
Exports
PTN index 1 name 'PTN';
Begin
end.

Пятый день мучаюсь. При вызове функции в IB обрывает связь.
Помогите чайнику, где лажа?

1. Входные параметры я специально сделал Pchar, как я думаю какие типы крутятся внутри DLL не важно, вход и выход нужного типа.
2. Для совместимости пишу cdecl; export;
3. В логах Access violation.
The code attempted to access a virtual
address without privilege to do so.
This exception will cause the Firebird server
to terminate abnormally.
4. UDF раньше не писал, обходился готовыми, но опыт работы с DLL есть, но чисто на Delphi и для Delphi.

Вот это работает:
Function PTN(IN_P:Pchar):PChar; cdecl; export;
begin
Result:=IN_p;
end;
Exports
PTN index 1 name 'PTN';
Begin
end.

Теперь появился следующий вопрос как из строки '11.12' убрать точку используя только PCHAR функции.

Как Выделить память с помощью ib_util_malloc(), что за входной параметр типа integer?

Делаю так:
library Conv_ML;
uses
SysUtils,Classes,ib_util;

Function PTN(var IN_P:PCHAR):PCHAR; cdecl; export;
VAR
Out_Schet,IN_Schet,Stat:ShortString;
begin
In_Schet:=StrPas(In_P);
Out_schet:='';
Repeat
if (Pos('.',In_SCHET)=0) and (Length(In_SCHET)<>0) then In_SCHET:=In_SCHET+'.';
Stat:='';
Stat:=copy(In_SCHET,1,Pos('.',In_SCHET)-1);
if length(Stat)<2 then Stat:='0'+Stat;
Out_Schet:=Out_Schet+Stat;
In_SCHET:=copy(In_SCHET,Pos('.',In_SCHET)+1,Length(In_Schet));
Until (Pos('.',In_SCHET)=0) and (Length(In_SCHET)=0);
Result:=ib_util_malloc(Length(Out_Schet)+1);
StrPCopy(Result,Out_Schet);
end;
Exports
PTN index 1 name 'PTN';
Begin
end.

Не работает, что не так?

В IB публикую так.
DECLARE EXTERNAL FUNCTION PTN
CSTRING (256)
RETURNS CSTRING (256) FREE_IT
ENTRY_POINT 'PTN' MODULE_NAME 'conv_ML.dll';

Всем огромное спасибо все пошло, не знаю по чему но вместо
Result:=ib_util_malloc(Length(Out_Schet)+1) было написано
GetMem(Result, Length(Out_Schet)+1)
Хотя я читал на
http://]www.ibase.ru/devinfo/udf_ok.htm

"""""А почему мы "распределяли" память таким способом, не проще ли было через GetMem?
К сожалению, нет. Функции GetMem и FreeMem работают с менеджером памяти Deplhi, который является "надстройкой" над менеджером памяти Win32. Поэтому, поручая IB DataBase "освободить" память, мы должны распределить ее "заранее оговоренным" способом, т.е. при помощи стандартной функции malloc. """""

Вот так не верь глазам своим.