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

Вниз

Перекодировка текста win-to-dos   Найти похожие ветки 

 
FiendAndre   (2003-07-10 10:34) [0]

Здравствуйте!
Такая проблема. Такая казалось бы простая процедура как ChartoOEM выдает ошибку аксес виолейшона в модуле user32. И вообще любая процедура работающая с PChar вызывает аналогичную ошибку. Что я делаю не так? :( Пробовал алокейтить мемори для всех PChar переменных - не помогает. Хотя в трейсе иногда удается не вызвать ошибку, но после этого комп виснет.
ПОМОГИТЕ!!!!


 
Song ©   (2003-07-10 10:41) [1]

Может пустую строку передаёшь?


 
FiendAndre   (2003-07-10 10:54) [2]

нет строка однозначно не пустая (беру ее из мемо и вижу в Watch)


 
MBo ©   (2003-07-10 11:01) [3]

код покажи


 
Radionov Alexey ©   (2003-07-10 11:10) [4]

Function MyCharToOem(Const S: String): String;
Begin
SetLength(Result, Length(S));
CharToOem(PChar(S), PChar(Result))
End;


 
Radionov Alexey ©   (2003-07-10 11:12) [5]

Для пущей надежности:

Function MyCharToOem(Const S: String): String;
Begin
SetLength(Result, Length(S));
If Result <> "" Then
CharToOem(PChar(S), PChar(Result))
End;



 
Romkin ©   (2003-07-10 11:21) [6]

function ToOEMString(const S: ansistring): ansistring;
begin
Result := S;
CharToOEM(PChar(Result), PChar(Result));
end;


А перезагружаться не пробовали?
У меня все работает!


 
FiendAndre   (2003-07-10 13:36) [7]

Спасибо всем!!!
все предложенные варианты работают.
вечером буду разбираться где я был неправ.



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

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

Наверх




Память: 0.47 MB
Время: 0.024 c
1-77946
Erik
2003-07-10 16:30
2003.07.24
В чем отличия CallBack для DCOM и Borland Socket Server?


1-77953
Дмитрий Стрижевич
2003-07-10 03:26
2003.07.24
копирование объектов...


9-77707
Карлсон
2002-12-21 21:26
2003.07.24
подлодки....


14-78100
Vlad Oshin
2003-07-07 18:03
2003.07.24
Сутки. Рассказ.


8-78001
Neznaika
2003-03-30 15:04
2003.07.24
мультимедиа