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

Вниз

Преобразование String в PwideChar   Найти похожие ветки 

 
Писатель   (2012-09-23 14:18) [0]

Используется RAD Studio XE. В интернетах удалось обнаружить по этой теме следущее.

var
 wideChars   : array[0..11] of WideChar;
 myString    : String;

begin
 // Задание значения нашей строке
 myString := "Hello World";

 // Копирование в формат WideChar в наш массив
 StringToWideChar(myString, wideChars, 12);

 // Показываем, что копирование дало
 ShowMessage(WideCharToString(wideChars));
end;


function StringToPWide(sStr: string; var iNewSize: integer): PWideChar;
var
 pw: PWideChar;
 iSize: integer;
begin
 iSize := Length(sStr) + 1;
 iNewSize := iSize * 2;

 pw := AllocMem(iNewSize);

 MultiByteToWideChar(CP_ACP, 0, PChar(sStr), iSize, pw, iNewSize);

 Result := pw;
end;


Но ни первое ни второе не работает, а вылетает с ошибками. В первом случае ему не нравится, что ему вместо PWideChar передают массив, если заменить массив на PwideChar, то будет вылет по ошибке связанной с памятью в которую неправильно обратились. Во втором случае он начинает матюкаться на это PChar(sStr).

Вопрос, как же все такие его преобразовать? API функция требует PWideChar.


 
Писатель   (2012-09-23 14:31) [1]

Забавно вот так 50); работает

PWideName := StringToWideChar(choosenChar, PWideName, (Length(WindowName) +50)); а так нет


 
Писатель   (2012-09-23 14:31) [2]

PWideName := StringToWideChar(choosenChar, PWideName, 50); вот так )


 
Hole   (2012-09-23 16:26) [3]

Для наглядности:

var
 S: AnsiString;
 W: WideString;
 P: PWideChar;
begin
 S := "Hello, World!";
 W := S;
 P := PWideChar(W);
end;


Delphi сама выполняет преобразование между типами данных AnsiString, WideString и UnicodeString. Поытому можно вообще написать вот так: PWideChar(WideString(S)); но это будет временная переменная, а поэтому пользоваться этим можно только "по месту".

И по поводу того, что вы тут в трех постах написали:

function StringToWideChar(const Source: UnicodeString; Dest: PWideChar; DestSize: Integer): PWideChar;
Returns a UNICODE string from an AnsiString.
StringToWideChar converts a string from ANSI to UNICODE and stores the result in a specified buffer.
Source is the string to convert. It must include at most DestSize – 1 characters.
Dest is the buffer into which StringToWideChar writes the corresponding UNICODE string. The caller allocates this memory to include at least DestSize wide characters. Following the call, Dest contains at most DestSize - 1 characters, terminated by a NULL wide character.
DestSize is the size of the buffer Dest.
StringToWideChar returns a pointer to Dest.


Посмотрите, чему равно SizeOf(WideChar), и сделайте соотвествующие исправления в коде.



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

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

Наверх




Память: 0.47 MB
Время: 1.803 c
15-1347821674
Dmitry375
2012-09-16 22:54
2013.03.22
Running Delphi on Mac OS X


2-1335086959
leklerk
2012-04-22 13:29
2013.03.22
Событие OnResize формы


15-1351354654
Дмитрий С
2012-10-27 20:17
2013.03.22
Сортировка папок и файлов наравне. windows 7


15-1343742743
qetuo
2012-07-31 17:52
2013.03.22
Чем бы потестить внешний хард


15-1328599963
igorserg
2012-02-07 11:32
2013.03.22
XMLDocument - косяк при изменении порядка следования тегов.