![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
string to bytes
Slatazan © (2002-11-02 03:57:00)Как правильно перегнать String в байтовый массив ?
А то у меня из-за этого глючит прога потом после MOVE ...
Slatazan (2002-11-03 05:23:00) [1]Спасибо.
Move точно глючит - там ведь первый байт длину несет.
Но я вобшем нашел пример в helpe (ранее не-натыкался)
A: array[0..79] of char;
Вобщем
StrPCopy(A, S);//from string S to char mass
Далее накрут t (длины стринга) где
b := byte(A[t]);
write(fileB, b);
:)
alexta (2002-11-03 00:03:00) [2]2 SPeller
Естественно не эфективно. Но если move глючит и не сильно важна скорость то сойдет.
SPeller (2002-11-02 18:20:00) [3]
> alexta (02.11.02 15:52)
> Можно и проще.
> for i:=1 to length(s) do
> massiv[i]:=ord(s[i]);
Не рационально с точки зрения времени выполнения.
alexta (2002-11-02 15:52:00) [4]Можно и проще.
for i:=1 to length(s) do
massiv[i]:=ord(s[i]);
wal (2002-11-02 15:48:00) [5]var a:array[0..N]of byte;
p:PChar;
s:String;
begin
p:=@a[0];
s:="Что-то там";
StrCopy(p,PChar(s))
end;
Пробовал (2002-11-02 05:19:00) [6]Move(String[1],ByteMassive[0],Length(String));?