| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

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

nester ©   (2004-04-09 21:55:00) 

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

---

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

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

---

Gandalf   (2004-04-10 20:04:00) [2]

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

---

Avenger[NhT]   (2004-04-10 17:36:00) [3]

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

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

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

---

nester   (2004-04-10 12:11:00) [4]

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

---

SPeller   (2004-04-10 08:04:00) [5]

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

---

Avenger[NhT]   (2004-04-10 00:46:00) [6]

А сам пробовал смотреть? Есть же исходник ;)
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:45:00) [7]

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

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


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

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

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


---

Наверх