Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

OemToChar не пашет в WinXP рус D6 ? [D6, WinXP]

Страницы: 1 2 3 >
blackman © (2003-01-23 09:43:00)
Скомпилировал старую программу работавшую в WIN98 с функцией
OemToChar результаты поражают своей кривизной.
В чем может быть дело:
- моя криворукость
- неправильная установка XP
- ошибка D6
- ...

blackman (2003-01-23 15:33:00) [1]
Нет я не беспокоюсь. Старый уже.
FAQ у меня не намного меньше.
А вот с причесыванием я засел.
Времени не хватает. Да и желания.
А на этом сайте похоже все затихает

Anatoly Podgoretsky (2003-01-23 15:15:00) [2]
blackman © (23.01.03 14:37)
Что то ты нервный, я твой спосок проинтерпритировал значительно спокойней, чем ты его предподал

- ошибка в программк
- ошибка в XP
- ошибка в D6

blackman © (23.01.03 15:02)
Свой FAQ все таки веди сам, в моем такого нет, доступ нужен до FAQ данного сайта, я бы тогда его причесал.

blackman (2003-01-23 15:02:00) [3]
>Anatoly Podgoretsky
Перечитал еще раз
"Спасибо, но ты мне продашь этот FAQ, что бы он стал моим, полный доступ до сервера" -
Вот это я не понял. Что продать-то ?
Я так все отдам. Бесплатно. А для Толи тем болЕЕ.
http://blackman.wp-club.net/cncat/
- оценка 10

blackman (2003-01-23 14:37:00) [4]
>Anatoly Podgoretsky
Bundesgrenzschutz и всё ?
Это похоже на приговор.
Может лучше и не жить ?
Курить-то конечно нельзя.

Anatoly Podgoretsky (2003-01-23 14:30:00) [5]
В итоге остался только первый пункт из списка, то есть проблема в твоей программе.

blackman (2003-01-23 14:23:00) [6]
>Игорь Шевченко
Все от нервов...
Когда сплю, я очень хороший!

Игорь Шевченко (2003-01-23 14:19:00) [7]
А наездов-то было...и на Delphi и на XP... :-)))

blackman (2003-01-23 13:42:00) [8]
А ларчик просто открывался !!!!!!!!!!!!!!!!!!!!!!
Сосед прогуливавшияся мимо просто поменял
для memo OEMConvert в True.
И все дальнейшие действия по перекоду...
Пошутить он хотел. Убью гада!!!

Reindeer Moss Eater (2003-01-23 13:12:00) [9]
>Reindeer Moss Eater
Это ты не прав. Просто сделаю свою таблицу и грузить буду не через load от Memo

Тебе говорили про использование CharToOem. Можно использовать эту функцию в D, в С, С++, в VB, в скрипте Вайза в конце концов!
Результат будет одинаков с точностью до сотых долей бита.

blackman (2003-01-23 13:09:00) [10]
>Игорь Шевченко
Пробовал и из FAQ.
>Reindeer Moss Eater
Это ты не прав. Просто сделаю свою таблицу и грузить буду не через load от Memo
видимо дело в этом.
Что касается установки WIN это Вы не правы!
Я ее ставлю на разные машины чуть ли ни каждый день.
Работа такая...
Да ладно. Спасибо.
Буду программу писать

Anatoly Podgoretsky (2003-01-23 13:07:00) [11]
blackman © (23.01.03 12:37)
Спасибо, но ты мне продашь этот FAQ, что бы он стал моим, полный доступ до сервера.
Но я прежде чем пользоваться рецептом из FAQ смотрю описание функции в хелпе.

Эти функции не их Дельфи, а из WinApi так что у тебя будет тот же самый результат.

Игорь Шевченко (2003-01-23 12:52:00) [12]
blackman © (23.01.03 12:44)
Но весь твой код от кода в FAQ несколько отличается, не так ли ?

Reindeer Moss Eater (2003-01-23 12:49:00) [13]
А на C будет все точно так же

blackman (2003-01-23 12:44:00) [14]
>Игорь Шевченко
Если правильно, но не работает, то ?
>Separator
Да уж излазил все.
Самое смешное, что перенос проги на машины с 98 приводит к ее полной работоспособности ...
Ладно, спасибо всем и персонально Anatoly Podgoretsky ©
за
Bundesgrenzschutz
Буду искать в чем дело, а скорее всего просто напишу на С и вклею в Delphi.

Игорь Шевченко (2003-01-23 12:39:00) [15]
blackman © (23.01.03 12:37)

В FAQ все правильно написано...

Separator (2003-01-23 12:39:00) [16]
Пошарься в настройках WinXP

blackman (2003-01-23 12:37:00) [17]
>Anatoly Podgoretsky
Тогда надо Вам несколько почистить Ваш FAQ
http://delphi.mastak.ru/cgi-bin/faq.pl?look=1&id=988619974&n=19
- Эта версия работает под любым Delphi.
(Начиная с Delphi 2, это можно записать короче с использованием AnsiToOem и OemToAnsi.)
Здесь все просто...
Спасибо!

Anatoly Podgoretsky (2003-01-23 12:15:00) [18]
Bundesgrenzschutz © (23.01.03 04:05)
Первый и второй пункты твоего перечня причин, а что происходит тебе уже объяснили,

blackman (2003-01-23 12:02:00) [19]
>Separator
Пробовал и не помогает...

Separator (2003-01-23 11:58:00) [20]
function DosToWin(St:string):string; var Ch: PChar; begin Ch:=StrAlloc(Length(St)+1); OemToChar(PChar(St),Ch); Result:= Ch; StrDispose(Ch) end;
Код полностью рабочий, только надо делать ручную проверку, чтоб на вход подавался текстовый файл в OEM кодировке и все

Страницы: 1 2 3 >

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »