Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.11.24;
Скачать: CL | DM;

Вниз

String vs PAnsiChar   Найти похожие ветки 

 
o2 ©   (2003-09-28 08:57) [0]

Как конвертировать string в PAnsiChar? Заранее спасибо, а если и кусочек кода подбросите... тогда моей благодарности предела не будет!


 
I.C.   (2003-09-28 09:16) [1]

Ха..смеялся долго.

var a:string;
b:Pchar; // PAnsiChar если поковыряешься

b:=a; // неявное преобразование типов проведет Delphi
// хочешь знать как ? Types.pas, но это не твои
// проблемы по больщому счету

если красота всеже дороже

b:=PChar(a);

Если все таки не работает - смотри выделена ли память для b
тоесть с точки зрения Windows функций - это просто указатель
и еще это все должно заканчиваться #0 а то будет каша на
выходе...

Мастера поправте если не прав


 
o2 ©   (2003-09-28 11:12) [2]

Вот и фишка то в чём... он их не приравнивает нивкакую... говорит что разные типы...


 
Dan   (2003-09-29 09:07) [3]

Попробуй так.

var
str: string;
B: PChar;
...
str:=str+chr(0);
B:=@str[1];

Удачи


 
Anatoly Podgoretsky ©   (2003-09-29 09:13) [4]

I.C. (28.09.03 09:16) [1]
А я очень долго смеялся за этот совет b:=a.

Вот это возможно правильный b:=PChar(a); в зависимости от того что он хочет получить от пустых строк.


 
Ihor Osov'yak ©   (2003-09-29 12:52) [5]

2 [3] Dan (29.09.03 09:07)

вот это
> str:=str+chr(0);

если str - не shortstring - то лишнее..


 
Livid ©   (2003-10-01 10:01) [6]

PChar есть указатель на массив символов, заканчивающийся на #0; String есть массив Char...
Тк указателем на массив является первый элемент его, то соответственно преобразовываем string к Pchar:

b:=b+#0;
a:=@b[1];

где a-pchar
и b-String;
Аналогично можно и при вызове функции. Главное, если передавать @str[1] как var, то следует заранее установить длину строки:
SetLength(str,len);



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

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

Наверх




Память: 0.47 MB
Время: 0.016 c
6-79094
RudeBoy
2003-09-29 21:28
2003.11.24
Как проверить существует ли файл в Интернете


1-78952
Alexus
2003-11-11 19:20
2003.11.24
Вызов функции ...


3-78855
DmitryMN
2003-11-03 17:12
2003.11.24
Индексы


1-79000
Andrey V.
2003-11-14 11:09
2003.11.24
Убрать курсор в TMemo


3-78806
licherep
2003-11-05 10:11
2003.11.24
помогите сделать запрос