Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.10.17;
Скачать: 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 вся ветка

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

Наверх




Память: 0.46 MB
Время: 0.028 c
1-1096917443
lipskiy
2004-10-04 23:17
2004.10.17
Как предотвратить "замерзание" проигрывания авишки в TAnimate


4-1095093444
maxistent
2004-09-13 20:37
2004.10.17
Считывание памяти


1-1096624987
leonidus
2004-10-01 14:03
2004.10.17
Как програмно заблокировать pop-up окна?


3-1095669533
top100
2004-09-20 12:38
2004.10.17
значения полей TFloat


4-1095240975
xman
2004-09-15 13:36
2004.10.17
HDD





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский