Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2007.08.12;
Скачать: [xml.tar.bz2];

Вниз

Как корректно переконвертировать 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;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.061 c
15-1184365759
lookin
2007-07-14 02:29
2007.08.12
Чего не спите?


15-1184256508
TUser
2007-07-12 20:08
2007.08.12
Таки он есть :)


15-1184569945
PZ
2007-07-16 11:12
2007.08.12
Странное явление


2-1184408740
Knob
2007-07-14 14:25
2007.08.12
Помогите! Как написать простой AI


2-1184826661
pathfinder
2007-07-19 10:31
2007.08.12
Сообщение компилятора Delphi 2006..





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский