Вниз
Скачать: CL | DM;

PChar2   Найти похожие ветки 

 
Muskat   (2003-06-11 14:40) [0]

function Test1(S: String): PChar;
begin
Result := PChar(Copy(S,2,Length(S)));
end;

procedure TForm1.Button1Click(Sender: TObject);
var
c : PChar;

begin
c := Test1("*2");
ShowMessage(c);
end;

При вызове функции Test1,
с параметром "*2", результат = nil,
с параметром "*23", результат = "23",
с параметром "*234", результат = "23",
с параметром "*2345", результат = "2345",

Но если заменить тип результата на String, тогда все нормально:
с параметром "*2", результат = "2",
с параметром "*23", результат = "23",
с параметром "*234", результат = "234",
с параметром "*2345", результат = "2345".

В чем дело?


 
han_malign ©   (2003-06-11 14:49) [1]

скажи спасибо что не AV - передаешь в результате адрес временной строки, которая неявно создается в Copy, и уничтожается при выходе из функции(поскольку Reference Counter = 0, т.к. нет присвоения другой строковой переменной)


 
Юрий Зотов ©   (2003-06-11 15:22) [2]

> Muskat (11.06.03 14:40)

Это уже не первый Ваш эксперимент с PChar, верно? И каждый раз возникают вопросы. Но ведь так можно экспериментировать всю жизнь, не лучше ли просто почитать про указатели и работу с динамической памятью? Чтобы снять все вопросы навсегда.


 
vv3 ©   (2003-06-19 00:11) [3]

А StrPCopy - нет?


 
VMcL ©   (2003-06-19 01:34) [4]

>vv3 © (19.06.03 00:11)

Ещё один блеснул интеллектом.



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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.029 c
4-97937
DelBoy
2003-04-25 22:33
2003.06.30
Пересылка события нажатия клавиши


1-97633
alt7
2003-06-19 13:17
2003.06.30
try except finally


3-97521
Fantasy
2003-06-06 01:48
2003.06.30
Lookup-поля


14-97830
Bboy
2003-06-12 10:25
2003.06.30
Вот бы поменять все буквы с больших на маленькие...


7-97900
Любомиров
2003-04-21 22:38
2003.06.30
Питающая сеть - характеристики




   Наверх