Консультация № 188337
06.12.2015, 12:53
0.00 руб.
0 3 1
Здравствуйте, уважаемые эксперты! Прошу вас ответить на следующий вопрос:
Помогите исправить ошибку:
Вот ошибка: http://clip2net.com/s/3rkiTss
procedure Form1.openFile;//Чтение из файла
begin
if openFileDialog1.ShowDialog = System.Windows.Forms.dialogResult.ok then
begin
try
var stArr:= readAllLines(openFileDialog1.FileName);
for var i:= low(stArr) to high(stArr) do
if i mod 2 = 0 then
stk.add(stArr[i], strToInt(stArr[i+1]));
except
MessageBox.Show('Не удалось открыть файл');
exit;
end;
end;
end;



если надо, скину всю программу..

Обсуждение

давно
Старший Модератор
31795
6196
06.12.2015, 13:37
общий
это ответ
Здравствуйте, Посетитель - 399158!

Цитата: Help PascalABC.NET
function ReadAllLines(path: string; en: Encoding): array of string;
Считывает строки из файла с кодировкой en в массив строк

Вам нужно ещё указать кодировку.
Удачи!
Об авторе:
Мне безразлично, что Вы думаете о обо мне, но я рад за Вас - Вы начали думать.

давно
Посетитель
399158
228
06.12.2015, 13:47
общий
как это сделать?
давно
Старший Модератор
31795
6196
06.12.2015, 14:41
общий
Адресаты:
Посмотрите к примеру тут.
Об авторе:
Мне безразлично, что Вы думаете о обо мне, но я рад за Вас - Вы начали думать.

Форма ответа