Вниз
Скачать: CL | DM;

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

← →
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?
Как это можно указать?


← →
Alx2 ©   (2002-08-26 16:28) [6]

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


← →
Alx2 ©   (2002-08-26 16:35) [7]

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


← →
Abajun ©   (2002-08-26 16:36) [8]

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



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.01 c
7-14286
Proton
2002-06-23 03:55
2002.09.05
клавиши управления пистанием


3-13963
alexvan
2002-08-16 12:46
2002.09.05
EDBEngineError Key Violation


3-13890
Nikkk
2002-08-14 13:10
2002.09.05
insufficient memory


1-14035
Up
2002-08-26 06:31
2002.09.05
Cкрытые ключи реестра


1-14150
MASTER'ok
2002-08-24 22:55
2002.09.05
Файлы...




   Наверх