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

Char   Найти похожие ветки 

← →
Hammer1 ©   (2002-11-11 10:46) [0]

Мастера помогите. Как загнать строку в char масив.

---

← →
Skyle ©   (2002-11-11 10:54) [1]

А чем тебе она как строка не нравится в этом смысле?

---

← →
e-mike ©   (2002-11-11 10:58) [2]

Преобразовать к PChar и работать с ним, как с массивом:


var
s:string;
a:pchar;
begin
s:="asdfghj";
a:=pchar(s);
showmessage(a[4]);
end;


---

← →
Smithson ©   (2002-11-11 11:00) [3]

А зачем? Строка и так является массивом символов (с индексами от 1 до length(string)).

---

← →
Hammer1 ©   (2002-11-11 11:17) [4]

Мне необходимо использовать функцию, входным элементом которой является не строка а масив char

---

← →
Skier ©   (2002-11-11 11:18) [5]

>Hammer1
Move(...) ?

---

← →
Alx2 ©   (2002-11-11 11:54) [6]

>Hammer1 © (11.11.02 11:17)
Использовать приведение типов.
Так например:
type
TInputArray = array [1..100] of char;

procedure SomeFunc(Const Arr : TInputArray); // То, куда надо передать
begin
..............
end;

procedure test;
Var S : String;
begin
SomeFunc(TInputArray((@S[1])^)); // Передаем как char-массив
end;

---

← →
Reindeer Moss Eater   (2002-11-11 12:01) [7]

StrPLCopy

---

← →
Hammer1 ©   (2002-11-11 12:06) [8]

Alx2 и Skier, а также всем остальным, спосибо за помощь.

---

← →
Dimka Maslov ©   (2002-11-11 12:51) [9]

Можно приведение типов не использовать. Если аргумент функции имеет тип PChar, то к нему можно обращаться как к массиву символов, начальным индексом которого является 0.

procedure SomeProc(Arr: PChar);
begin
Arr[1]:=....
end;

var
S: string;
begin
SomeProc(PChar(Arr));
end;

---

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

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



Память: 0.46 MB
Время: 0.011 c