|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Delphi 2010 ошибка несоответствие типов 'Array' and 'PAnsiChar' при использовании OEM
Здравствуйте. Пытаюсь запустить на 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; end; |