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

Вниз

Как корректно переконвертировать PWideChar в WideString?   Найти похожие ветки 

 
Dr. Andrew   (2007-07-11 17:12) [0]

Как корректно переконвертировать PWideChar в WideString? Есть такая функция наподобие PWideCharToWideString? Спасибо всем за ответ!


 
Reindeer Moss Eater ©   (2007-07-11 17:13) [1]

PWideChar в ансистроку, а она уже совместима по присваиванию c widestring


 
Dr. Andrew   (2007-07-11 17:20) [2]

А можно более конкретнее привести пример? или функцию? Спасибо!


 
Однокамушкин   (2007-07-11 17:22) [3]

А зачем вам функция? Просто присваиваете WideString-овой переменной значение типа PWideChar, и умный компиялтор всё сделает...


 
Dr. Andrew   (2007-07-11 17:26) [4]

но при этом подобная конструкция if WidePos(#32, pw) = 0 then находит пробел, которого в действительности нет, напрмиер в строке "строка№1". Как правильно все же сделать запись?


 
MetalFan ©   (2007-07-11 18:45) [5]

а разве простое присвоение не пройдет?
и зачем тут чтото конвернтировать???


 
Однокамушкин   (2007-07-11 18:58) [6]

Проверил на таком коде:

procedure TForm1.Button1Click(Sender: TObject);
var
 P: PWideChar;
 S: WideString;
begin
 S := "Строка№1";
 P := SysAllocString(PWideChar(S));
 Button1.Caption := IntToStr(WidePos(#32, P));
 SysFreeString(P);
end;


Работает правильно, пробелов не находит... подозреваю, что у вас в pw ещё какой-то хвост есть из-за отсутствия нулевого терминатора в конце...



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

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

Наверх




Память: 0.48 MB
Время: 0.028 c
1-1180440433
gray_falcon
2007-05-29 16:07
2007.08.12
Есть ли замена для TMemoryStream


3-1178012895
Sapos
2007-05-01 13:48
2007.08.12
Формат времени


2-1184835818
pathfinder
2007-07-19 13:03
2007.08.12
Переделка компонентов..


1-1180969002
webpauk
2007-06-04 18:56
2007.08.12
Запретить навигацию


15-1184496499
Pgremse
2007-07-15 14:48
2007.08.12
Проблемы с запуском Turbo Delphi