lib_resloader помогите
Решил перейти на эту либу пишу вот так
uses resloader; var res,line: string;// map: array [0..10, 0..10] of integer; x,y:integer; procedure LoadMap; begin res :=LoadText('map/map.txt'); for y := 0 to 10 do begin line := ReadLine(res);//сдесь жалуется ошибка в параменте 1 for x := 0 to 10 do map[x,y] := StringToInteger(GetChar(line,x)); end; end; |
Ответ: lib_resloader помогите
Смотри:
1) Команда LoadText считывает файл полностью, так что в res уже считывается весь файл целиком, считывать дальше построчно нет смысла. 2) Если хочешь читать построчно используй OpenRes/ReadLine (без параметров, они там не нужны) или ReadLinesBlock. Второе предпочтительнее, так как там происходит перекодировка русского текста в случае чего. 3) Если ты там считываешь какие-то числа из файла и записываешь их в массив, то числа удобно записать через запятую и парсить их с помощью библиотеки Lib_parse |
Ответ: lib_resloader помогите
короче вырубил либу убрал нах**
|
Ответ: lib_resloader помогите
Цитата:
|
Часовой пояс GMT +4, время: 16:20. |
vBulletin® Version 3.6.5.
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Перевод: zCarot