Показать сообщение отдельно
  #1  
Старый 20.11.2007, 17:53
Slawka_SoD Slawka_SoD вне форума
Прохожий
 
Регистрация: 20.11.2007
Сообщения: 2
Репутация: 10
По умолчанию Хранение в Массиве строк с более 255 символами

Проблема такая.

Имеется два списка вида (в принципе как надо такой и сделаем)

Код:
1 Текст длинный символов 300
5 Тоже текст числа в начале ключи идут не попорядку
8 Маленький текст

И в таком духе второй тока с подобными ключами.
В массив при разработке не влазят пишут мол больше 255 знаков.
Сейчас проблему решили чтением из файлов (каждому списку свой файл) и дальше его парсим
Код:
	AssignFile(F,File_Name);
	Reset(F);

	while not EOF(F) do
  begin
		Readln(F, S);
		Buf:=Explode(':=:',S);
     if(strtoint(Buf[0])=strtoint(Edit1.Text)) then
      begin
        Form2.Memo1.Lines.Text:='';
        Form2.Memo1.Lines.Add('#'+Buf[0]);
        Form2.Memo1.Lines.Add(StringReplace(Buf[1],'\n',#13,[rfReplaceAll, rfIgnoreCase]));
      end;
	end;
	CloseFile(F);

Так вот как-то это не правильно давать юзеру открытые файлы даи много выходит 3 файла на маленький скриптик.


Можно как нить это все в один закинуть файл или как максимум в два нечитаемых
Ответить с цитированием