Delphi 2010 ошибка несоответствие типов 'Array' and 'PAnsiChar' -> Форум на Исходниках.Ру

	Наши проекты: Журнал · Discuz!ML · Wiki · DRKB · Помощь проекту

Здравствуйте, Гость ! [18.119.125.135]

ПРАВИЛА РАЗДЕЛА · FAQ раздела Delphi · Книги по Delphi

Пожалуйста, выделяйте текст программы тегом [сode=pas] ... [/сode]. Для этого используйте кнопку [code=pas] в форме ответа или комбобокс, если нужно вставить код на языке, отличном от Дельфи/Паскаля.

Следующие вопросы задаются очень часто, подробно разобраны в FAQ и, поэтому, будут безжалостно удаляться:
1. Преобразовать переменную типа String в тип PChar (PAnsiChar)
2. Как "свернуть" программу в трей.
3. Как "скрыться" от Ctrl + Alt + Del (заблокировать их и т.п.)
4. Как прочитать список файлов, поддиректорий в директории?
5. Как запустить программу/файл?
... (продолжение следует) ...

Вопросы, подробно описанные во встроенной справочной системе Delphi, не несут полезной тематической нагрузки, поэтому будут удаляться.
Запрещается создавать темы с просьбой выполнить какую-то работу за автора темы. Форум является средством общения и общего поиска решения. Вашу работу за Вас никто выполнять не будет.

Внимание
Попытки открытия обсуждений реализации вредоносного ПО, включая различные интерпретации спам-ботов, наказывается предупреждением на 30 дней.
Повторная попытка - 60 дней. Последующие попытки бан.
Мат в разделе - бан на три месяца...

Модераторы: jack128, D[u]fa, Shaggy, Rouse_

Новое голосование

Delphi 2010 ошибка несоответствие типов 'Array' and 'PAnsiChar' , Delphi 2010 ошибка несоответствие типов 'Array' and 'PAnsiChar' при использовании OEMtoAnsi

maxjuvefan

Сообщ. #1 , 17.11.17, 11:27

Junior

Профиль · PM

Рейтинг (т): -1

Здравствуйте. Пытаюсь запустить на embarcadero rad studio 2010 следующий код на delphi:

Var

F : Textfile;

vstr,dstr : array[0..255] of Char;

xstr : string;

begin

AssignFile(f,FileNameEdit1.Text);

Reset(F);

while not EOF(F) do begin

ReadLn(F,vstr);

OEMtoAnsi((vstr),(dstr));

xstr:=(dstr);

xstr:=DelSpace(xstr);

end;

Выскакивает ошибка: «Incompatible types: 'Array' and 'PAnsiChar'». Как ее можно исправить?

^D^ima	Сообщ. #2 , 17.11.17, 13:30
Guru Профиль · PM Поощрения: 3 Dgm Рейтинг (т): 303	А так? OEMtoAnsi(pansichar(vstr),pansichar(dstr));

MBo	Сообщ. #3 , 17.11.17, 14:10
Master Профиль · PM Поощрения: 3 Dgm Рейтинг (т): 320	>А так? Ещё лучше станет maxjuvefan Знаешь, чем отличается Char в Delphi версий 2009 и новее? Он юникодный по умолчанию. А буфер для OEMtoAnsi функции должен быть ансишный

maxjuvefan	Сообщ. #4 , 17.11.17, 14:11
Junior Профиль · PM Рейтинг (т): -1	^D^ima, так выдает ошибку: "E2089 Invalid typecast" Сообщение отредактировано: maxjuvefan - 17.11.17, 14:12

0 пользователей читают эту тему (0 гостей и 0 скрытых пользователей)

0 пользователей:

[ Script execution time: 1,2390 ] [ 16 queries used ] [ Generated: 19.04.24, 00:20 GMT ]