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

Вниз

Массивы   Найти похожие ветки 

 
Neket   (2007-01-04 16:46) [0]

Подскажите как можно присвоить массиву   szTip: array [0..63] of AnsiChar; обычную строковую переменную кроме как

s:="Wazuuuup!!!"
For i:=1 to length(s) do
szTip[i]:=s[i];


 
ors_archangel ©   (2007-01-04 16:52) [1]

Должно работать такое

 Move(s[1],szTip[0],length(s)+1);

но лучше

if s = nil then
 szTip[0] := #0
else
 Move(s[1],szTip[0],length(s)+1);

иначе, если s - пустая строка, то в szTip будт не понять что, это можно игнорировать только если известно, что szTip проинициирован нулями (ведь нам нужен ASCIIZ, да?), а ещё лучше

if s = nil then
 szTip[0] := #0
else
 Move(s[1],szTip[0],max(length(s)+1,length(szTip)-1));

чтобы не было "переполнения", в этом случае при length(s) > length(szTip) получаем ASCIIZ, где конечный ноль будет записан в szTip[high(szTip)].
з.ы. Наверно, есть ещё методы, но этот хотя бы от ошибок защищён


 
begin...end ©   (2007-01-04 17:32) [2]

StrLCopy(szTip, PChar(s), Pred(sizeof(szTip)))



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

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

Наверх




Память: 0.47 MB
Время: 0.03 c
2-1168035230
Ламер 2.Х
2007-01-06 01:13
2007.01.21
Как отправить все Memo (но не мимо)?


15-1167181514
Янис Прасол
2006-12-27 04:05
2007.01.21
Виндоуз маздай, а линукс круче всех


15-1167503328
Pazitron_Brain
2006-12-30 21:28
2007.01.21
Побрился первый раз!


2-1167991193
fagu
2007-01-05 12:59
2007.01.21
Delphi7


1-1164810385
zdm
2006-11-29 17:26
2007.01.21
Свернуть форму