Форум: "Начинающим";
Текущий архив: 2009.01.25;
Скачать: [xml.tar.bz2];

Вниз

char & string как?   Найти похожие ветки 

← →
vegarulez ©   (2008-12-11 14:57) [0]

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

var
a : Array [0..1024] of Char;
s:string;
i:integer;
...
если делаю вот так:
a[0]:="H";
a[1]:="e";
a[2]:="l";
...

то  всё нормально записывается
а если делаю вот так,

s:="Hello!";
 for i:=0 to length(s)-1 do
  a[i]:=copy(s,i,1);
то компилятор не хочет компилировать - ругается на соответствие типов...
подскажите как правильно сделать.

---

← →
clickmaker ©   (2008-12-11 15:07) [1]

вообще-то, в string индекс с 1 начинается
и зачем там copy?

---

← →
Ega23 ©   (2008-12-11 15:09) [2]

Результат Copy - string.
Поэтому либо
a[i]:=copy(s,i,1).[0];
либо
a[i]:=Char(copy(s,i,1));

---

← →
charoey_mag   (2008-12-11 15:10) [3]

> a[i]:=copy(s,i,1);

S это уже массив
a[i]:=s[i];

---

← →
charoey_mag   (2008-12-11 15:13) [4]

var
a : Array [0..1024] of Char;
s:string;
i:integer;

s:="Hello!";
for i:=1 to High(s) do
 a[i-1]:=s[i];

Вот так точнее, следи за индексами

---

← →
Anatoly Podgoretsky ©   (2008-12-11 15:53) [5]

> vegarulez  (11.12.2008 14:57:00)  [0]

a[i]тип CHAR, s/copy тип STRING
Смотреть в справке тип функции.

---

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

Форум: "Начинающим";
Текущий архив: 2009.01.25;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.45 MB
Время: 0.007 c