[Muxer]

Помогите, необходимо переркинуть данные из массива элементов типа Char в стороку одной функцией(желательно). Посимвольное перекидывание типа: a[x]:=c[y], где a: string, а c: array of char в цикле не годится.

[AlexZL]

ну например так:

Код:

var M: string;
    STR: array[0..50] of Char;

begin
  STR:= 'Hello from hell!'#0;
  M:= String(STR);
  showMessage(M);
end.

[Muxer]

Вообще массив динамический, хотя тут по барабану...
Хорошо, а как организовать с PChar? PChar тоже приветствуется...
Не знаю как задать длину PChar. Пробовал GetMem(вроде как, точно не помню), он задает неправильную длину.

[AlexZL]

если динамический то тут не пройдет вот ЭТО:

Код:

STR:= 'Hello from hell!'#0;

присваивать придется поэлементно а все остальное также

а PChar -- нужен ли он тебе тут? этоже всего лишь указатель на массив символов.

[Muxer]

Массив динамический, но перед передачей в него данных устанавливается фиксированная длина. А как вообще зарезервировать место под PChar? Какой функцией?
Кстати, есть ли функция, резервирующая место под переменную string, типа Func(a,xxx), где a - переменная типа string, а xxx - резервируемое для нее кол-во символов?

[AlexZL]

Зачем под String резервировать? Там же память вроде динамически выделяется. вот тут посмотри :http://it.kgsu.ru/Ob_Pas/obpas035.html

PCHAR - это не строка а всего лишь указатель на строку, если нада динамически выделять память- создаешь динамический массив, работаешь с ним, и кастуй на него хоть тысячу PChar'ов,
ну типа MyPChar:= PChar(MyArray);

[AlexZL]

Да чего мучаться, работай со String'ом, если приспичит, всегда сможешь конвертнуть в PChar.

[Muxer]

Дело в том, что при увеличении длины такой строки, если она расти по каким-либо причинам дальше не может, то для нее переопределяется память, а я хочу этого избежать. Мне нужно задать длину строки в теле программы, а не в описании, т.е. var a: string[2000] не годится.

[AlexZL]

А чем динамический массив не устраивает?

стрингу вроде нельзя заранее выделить большой кусок памяти

[Muxer]

Я еще поковыряюсь... Хотел стрингу юзать как альтернативу.