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

Есть ли в КОЛ аналог StrPas и StrPCopy кроме как в KOLSysUtils?   Найти похожие ветки 

← →
nester ©   (2004-04-09 21:55) [0]

Есть ли в КОЛ аналог StrPas и StrPCopy кроме как в KOLSysUtils?
Или другой механизм, который будет реальизовывать это, а то KOLSysUtils добавляет лишнии килобайты


← →
Avenger[NhT] ©   (2004-04-10 00:45) [1]

А сам пробовал смотреть? Есть же исходник ;)
StrPas насколько мне известно нету, да и не нужен он особо...
но можешь рипануть из VCL:

function StrPas(const Str: PChar): string;
begin
 Result := Str;
end;


StrPCopy есть, еслибы ты посмотрел, то обязательно заметил ее ;)
тоже не особо понимаю зачем ее использовать...

можно ведь так делать:

var
 s: String;
 C: PChar;
begin
 с := PChar(S);
end;


← →
Avenger[NhT] ©   (2004-04-10 00:46) [2]

А сам пробовал смотреть? Есть же исходник ;)
StrPas насколько мне известно нету, да и не нужен он особо...
но можешь рипануть из VCL:

function StrPas(const Str: PChar): string;
begin
 Result := Str;
end;


StrPCopy есть, еслибы ты посмотрел, то обязательно заметил ее ;)
тоже не особо понимаю зачем ее использовать...

можно ведь так делать:

var
 s: String;
 C: PChar;
begin
 с := PChar(S);
end;


← →
SPeller ©   (2004-04-10 08:04) [3]

Я ошибаюсь или нет: если делать с := PChar(S), то переменная С будет иметь смысл до тех пор, пока живет переменная S, так как С будет указывать на первый символ строки S ?


← →
nester ©   (2004-04-10 12:11) [4]

Понятно, спасибо:))
А зачем два раза одно и то же? для лучшей усвояемости:)))?


← →
Avenger[NhT] ©   (2004-04-10 17:36) [5]

SPeller, ты не прав имхо...

var
 s: String;
 C: PChar;
begin
 s:="test";
 c := PChar(S);
 s := "";
 ShowMessage(c);
end;

этот код выведет test все равно ;)


← →
Gandalf ©   (2004-04-10 20:04) [6]

Оно и так ясно - стринги нулем не заканчиваются...


← →
Владимир Кладов   (2004-04-10 20:26) [7]

Просто c продолжает показывать на мусор. Пройдет немного еще операций с кучей, и там будет лежать что попало.



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

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



Память: 0.46 MB
Время: 0.036 c
1-1096382476
Antonmm2
2004-09-28 18:41
2004.10.17
Функции


14-1096452508
MYSTERYO
2004-09-29 14:08
2004.10.17
Розыгрыш от Балтики3. Вот в Краснодаре буквы Л не хватает,


4-1095149940
akim2
2004-09-14 12:19
2004.10.17
Параметры запуска сервиса


14-1096548475
Guest
2004-09-30 16:47
2004.10.17
Срочно нужен совет


1-1096378968
Lord_Prizrak
2004-09-28 17:42
2004.10.17
Плагины.




   Наверх