Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.07.18;
Скачать: CL | DM;

Вниз

Строка из массива символов   Найти похожие ветки 

 
VasRog   (2004-07-02 18:13) [0]

Подскажите, пожалуйста, с таким вопросом.
Имеется динамический массив символов. Как мне взяв некоторые элементы данного массива соединить их в строку.


 
begin...end ©   (2004-07-02 18:17) [1]

var
 S: String;
 MyArray: array of Char;

begin
 S := MyArray[0] + MyArray[1] + ...
end.


 
Amoeba ©   (2004-07-02 18:25) [2]

Если количество выбираемых элеменов массива известно, то стоит еще сперва сделать

SetLenghth(S, N);


 
Тимохов ©   (2004-07-02 18:31) [3]


>  то стоит еще сперва сделать

ну и заполнять иначе: s[0] := a[0]; s[1] := a[1]; ....

а если они подряд, то можно вообще через move, т.е. область памяти копировать.


 
TUser ©   (2004-07-02 18:34) [4]

Зачем?
s:="";
for i:=low to high do s:=s+CH[i];


 
TUser ©   (2004-07-02 18:35) [5]

[4] - это я на [2] отвечал.
А лучше, действитедьно, Copymemory ect


 
Тимохов ©   (2004-07-02 18:40) [6]


> TUser ©   (02.07.04 18:35) [5]

лучше move - он быстрее.


 
Igorek ©   (2004-07-02 19:30) [7]

procedure TForm1.Button2Click(Sender: TObject);
var
 S: String;
 MyArray: array [0..1] of Char;
begin
 MyArray[0] := "A";
 MyArray[1] := "B";
 SetString(S, MyArray, Length(MyArray));
end;


 
VasRog   (2004-07-03 00:33) [8]

Всем спасибо.



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

Текущий архив: 2004.07.18;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.024 c
14-1088507553
QuasiLamo
2004-06-29 15:12
2004.07.18
Срочно! Нужен кто-нибудь русскоговорящий


3-1087973575
student2
2004-06-23 10:52
2004.07.18
Поиск серверов Oracle


1-1088979367
jktu
2004-07-05 02:16
2004.07.18
Как сделать свою функцию


1-1088931987
ida
2004-07-04 13:06
2004.07.18
заставить работать клавиатурные сокращения в динамич меню


9-1080912554
Andrey128
2004-04-02 17:29
2004.07.18
directx