Главная страница
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.017 c
15-1182677885
tesseract
2007-06-24 13:38
2007.08.12
ММП - пора наконец!


1-1180448040
DevilDevil
2007-05-29 18:14
2007.08.12
TListBox.MultySelect.DragDrop.


6-1167919439
pest_tt
2007-01-04 17:03
2007.08.12
Отправка и прием файлов через NMSTRM


15-1184430455
Таможенник
2007-07-14 20:27
2007.08.12
Подскажите, где купить домен?


15-1184421318
DillerXX
2007-07-14 17:55
2007.08.12
Maple