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

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

Помогите разобраться PChar SetString [D7, WinXP]


kukuruza ©   (2010-06-14 15:13:00) 

Что-то не понимаю. Нужно вывести всю строку, а выводит только первый символ.


Var
 p_temp,p:PChar;
begin
p := 'text1 text2'
...
p_temp := p;
while P^ in ['A'..'Z', 'a', 'z', '0'..'9'] do  inc(p);
SetString(p_str, p_temp, p-p_temp);
WriteLn(p_str);
...


~AQUARIUS~   (2010-06-14 23:09:00) [1]


> Anatoly Podgoretsky ©   (14.06.10 20:38) [5]

Это просто по-сишному


Anatoly Podgoretsky   (2010-06-14 20:38:00) [2]

> Омлет  (14.06.2010 20:19:04)  [4]

Ну и для чего тут PChar?


Омлет   (2010-06-14 20:19:00) [3]

> Rouse_ ©   (14.06.10 16:59) [3]

Не, он хочет только первое слово.


Rouse_   (2010-06-14 16:59:00) [4]

Ниче так, но вот так будет немножко проще:
var
p: PChar;
begin
 p := 'text1 text2'
 WriteLn(p);


Anatoly Podgoretsky   (2010-06-14 16:41:00) [5]

> kukuruza  (14.06.2010 15:13:00)  [0]

Не нужно использовать PChar не умея с ним работать, да и лишнее оно здесь.


kukuruza   (2010-06-14 15:51:00) [6]

Все разобрался, пардон, вместо 'a', 'z' надо было 'a'..'z' , незаметил


Наверх

Титульная страница Поиск, карта сайта Написать письмо