Главная страница
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.032 c
2-1184248152
cava
2007-07-12 17:49
2007.08.12
линии


9-1157348875
VitaWED
2006-09-04 09:47
2007.08.12
Проблемs c памятью


8-1162985232
OlDirtyBastard
2006-11-08 14:27
2007.08.12
Label над точками в TChart


15-1184508737
P_
2007-07-15 18:12
2007.08.12
Пиратство - конструктивный подход.


6-1167811987
Владимир1
2007-01-03 11:13
2007.08.12
Заполнение текстового поля на странице через Delphi