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

Вниз

что за ошибка в работе со строками   Найти похожие ветки 

 
AngeL B.   (2002-06-25 18:05) [0]

Есть такой код

{$apptype console}

var
s: string;
p: pchar;

begin
s := "12345678ooo";
p := PChar(S);
s := "qqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqq";
writeln(s);

s := p;
writeln(s);
end.


на экран выводится:
qqqqqqqqq...
12345678

если добавить еще одну "o", то все станет на свои места.
Спрашивается как правильно сделать копию строки (мне нужен указатель) чтобы выделение шло не по 4 байта, тем более с округлением в младшую сторону?


 
Anatoly Podgoretsky ©   (2002-06-25 18:18) [1]

Что ты творишь, сначала присваиваешь указатель переменной Р, а затем портишь ешл, в конце используешь испорченный указатель еще раз, тебе еще повезло, что ты так просто отделался.



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

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

Наверх




Память: 0.46 MB
Время: 0.017 c
14-23772
Nevercomes
2002-06-07 23:24
2002.07.08
GTA 3 WinXp+Nvidia GeForse = с графикой проблемы!!!


1-23560
Феликс
2002-06-26 23:11
2002.07.08
Как сделать , чтобы filelistbox отоброжал вновь созд. файлы?


14-23748
Fissher
2002-06-05 16:46
2002.07.08
Приближение к реальности :-)


14-23724
kserg@ukr.net
2002-06-04 18:54
2002.07.08
Как реализовать автообновление приложения?


8-23678
ATLANTIDO
2002-03-01 19:07
2002.07.08
ИМПОРТ 3D-МОДЕЛЕЙ