Главная страница
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.013 c
1-23601
Paco
2002-06-24 13:37
2002.07.08
Как избавиться от borlndmm.dll, cc3250mt.dll и bpl-вайлов


7-23803
ATLANTIDO
2002-04-15 20:40
2002.07.08
Что такое


7-23809
VICTOR_
2002-04-11 15:45
2002.07.08
Помогите найти раздел на системном диске!!!


1-23659
Tutov Roman
2002-06-26 10:42
2002.07.08
Разыскивается URL


6-23700
Hash
2002-04-29 01:42
2002.07.08
не работает TCP/IP