Передача строки

← →
Abajun © (2002-08-26 15:36) [0]

Есть описание функции на Паскале:
function Init(var NPar: Word; var NFun:Word; var NCrit:Word; var S:PChar):Integer; stdcall;
Может кто знает аналогичный тип PChar в Фортране?
ПРоблема в том, что в ФОртране передается длина строки, а первый элемент начинается с 1.

← →
Alx2 © (2002-08-26 15:58) [1]

Тогда паскалевский аналог Shortstring?

← →
Abajun © (2002-08-26 16:14) [2]

Мне нужно узнать, как корректно описать тип PChar в Фортране.
Представленную функцию мне надо написать на Фортране, которая будет пониматься в паскале. ПРоблема возникла лишь со строкой.

← →
Skier © (2002-08-26 16:19) [3]

>Abajun
Исходи из того что PChar это указатель
на символьный массив, который заканчивается нулём.

← →
Alx2 © (2002-08-26 16:20) [4]

Pchar - массив символов с символом #0 в конце.
Собственно,при описании A : Pchar говорим, что A - адрес первого символа из вышеназванного массива. Осталось только в Фортране завести такую структуру :)

← →
Abajun © (2002-08-26 16:24) [5]

А первый элемент - 0, а не 1?
Как это можно указать?

Нет разницы какой индекс имеет первый элемент.
Просто в паскаль надо передавать адрес массива символов. И этот массив в качестве последнего элемента должен содержать 0.

Вернее (судя по приведенному описанию) адрес адреса массива :)

ОК, сейчас попробуем.

Передача строки Найти похожие ветки