VPF::преобразовать string в array of char и обратно

lebaon

Дата 15.8.2006, 16:19 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 36
Регистрация: 10.3.2006

Репутация: нет
Всего: нет

есть переменная типа string ,
есть array [1..2048] of char,
нужно преобразовать данные между ними, вопрос как? smile

delphi 2003

Romikgy

Дата 15.8.2006, 16:21 (ссылка)

(нет голосов)

Загрузка ...

Любитель-программер

Профиль
Группа: Участник Клуба
Сообщений: 7326
Регистрация: 11.5.2005
Где: Porto Franco Odes sa

Репутация: 26
Всего: 146

string ()
Pchar()

--------------------

Владение русской орфографией это как владение кунг-фу — истинные мастера не применяют его без надобности.

Alexeis

Дата 15.8.2006, 16:26 (ссылка)

(нет голосов)

Загрузка ...

Амеба

Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 109
Всего: 459

lebaon,
если бы всместо array [1..2048] of char
был array [0..2047] of char
то сработало бы простое присваивание, а так
s->m

Код


var
  s : ansistring;
  m : array [1..2048] of char;
begin
.......
move(s[1], m[1], 2048);

m->s

Код


var
  s : ansistring;
  m : array [1..2048] of char;
begin
.......
setlength(s, 2048);
move(m[1], s[1], 2048);

Это сообщение отредактировал(а) alexeis1 - 15.8.2006, 16:29

--------------------

Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать

Yanis

Дата 15.8.2006, 16:31 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 2937
Регистрация: 9.2.2004
Где: Москва

Репутация: 72
Всего: 111

Цитата(alexeis1 @ 15.8.2006, 17:26

)

то сработало бы простое присваивание

Оно в любом случае сработать должно!

Добавлено @ 16:31

Код

var
  s: string;
  a: array[1..2048] of char;
begin
  { s -> a  }
  Move(s, a, IfThen(Length(s) <= Length(a), Length(s)));
end;

Это сообщение отредактировал(а) Yanis - 15.8.2006, 16:39

--------------------

*щёлк*

Rennigth

Дата 15.8.2006, 16:34 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 1708
Регистрация: 21.6.2004
Где: Moscow

Репутация: 49
Всего: 76

Код


var
  lStrArr: array [1..16] of Char;
  lStr: string;
begin
  lStr := 'asdfasdjklfa';
  StrPCopy(@lStrArr[1], lStr);
  ShowMessage(lStrArr);

--------------------

(* Honesta mors turpi vita potior *)

Snowy

Дата 15.8.2006, 16:43 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 192
Всего: 484

А зачем? По сути string и есть array of char...

jack128

Дата 15.8.2006, 17:01 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 81
Регистрация: 18.5.2005

Репутация: 2
Всего: 4

Цитата(Snowy @ 15.8.2006, 16:43

)

А зачем? По сути string и есть array of char...

компилятор иначе считает.

Snowy

Дата 15.8.2006, 17:09 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 192
Всего: 484

Естественно. Я ж не говорю, что они идентичны.
Просто для чего такого может потребоваться массив чаров, для чего не подойдёт стринг?

Yanis

Дата 15.8.2006, 17:10 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 2937
Регистрация: 9.2.2004
Где: Москва

Репутация: 72
Всего: 111

Цитата(Snowy @ 15.8.2006, 18:09

)

Просто для чего такого может потребоваться массив чаров, для чего не подойдёт стринг?

Для сохранения в типизированый файл smile

--------------------

*щёлк*

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »