Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 25.09.2013, 17:33   #21
ReportCube
Форумчанин
 
Аватар для ReportCube
 
Регистрация: 11.03.2011
Сообщений: 426
По умолчанию

А что за переменные такие IndStr и IndKey, может неверный тип данных используете?
ReportCube вне форума Ответить с цитированием
Старый 25.09.2013, 17:53   #22
Lana21
Пользователь
 
Аватар для Lana21
 
Регистрация: 10.09.2013
Сообщений: 11
По умолчанию

Цитата:
А что за переменные такие IndStr и IndKey, может неверный тип данных используете?
IndStr - Integer, используется для определения номера строки, в которую будут записываться данные. IndKey - строковый тип, в нем и содержатся данные, которые будут записываться в строку.
Lana21 вне форума Ответить с цитированием
Старый 25.09.2013, 18:44   #23
ReportCube
Форумчанин
 
Аватар для ReportCube
 
Регистрация: 11.03.2011
Сообщений: 426
По умолчанию

Если это так, то либо номер IndStr выходит за пределы диапазона, либо в IndKey содержатся некорректные данные (#0, #$D#$A), либо неверно сохраняете список. Поставьте бряк на указанной Вами строчке и посмотрите процесс присвоения.
ReportCube вне форума Ответить с цитированием
Старый 25.09.2013, 19:00   #24
JUDAS
фонатик DELPHI
Форумчанин
 
Аватар для JUDAS
 
Регистрация: 14.01.2008
Сообщений: 714
По умолчанию

Попробуйте так:
Код:
var
S : TStringList;
begin
  S := TStringList.Create();
  S.LoadFromFile('Filename.txt');
  if S.Count<1 then S.Add('Test') else  
    S.Strings[0] := 'Test';
   S.SaveToFile('Filename.txt');
   S.Free; 
end;
95% сбоев и ошибок приложений, находится в полу метрах от монитора
JUDAS вне форума Ответить с цитированием
Старый 25.09.2013, 20:08   #25
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,229
По умолчанию

Цитата:
Сообщение от Lana21 Посмотреть сообщение
Короче я все проверила. Все дело вот в этом:

Код:
F.Strings[IndStr] := IndKey;
Программа почему-то упрямо не хочет писать данные в строку обозначенную переменной. Кокретным числом - пожалуйста, сколько угодно. Переменной - низзя!
я же в пост #12 написал Вам такой код:
Код:
if IndStr < F.Count then
       F.Strings[IndStr] := IndKey
   else
       ShowMessage('В файле недостаточно строк для замены!');
Вы его проверили(попробовали)?!
Вы прошли в пошаговой отладке по этим строчкам?!



p.s. такое впечатление, что мои советы/ответы Вас чем-то напрягают, Вы упорно не хотите слушать то, что Вам говорят!
Вы не стесняйтесь, скажите, если мои советы Вам не нужны, я не буду мусорить и засорять вашу тему своим сообщениями...
Serge_Bliznykov вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Что не так делаю? ratqa Общие вопросы C/C++ 2 13.12.2012 16:54
Что не так я делаю? volha_alina Паскаль, Turbo Pascal, PascalABC.NET 2 23.05.2012 13:05
Что я делаю не так rj-45 Microsoft Office Excel 7 22.11.2011 10:21
Что не так делаю? L6go1as Общие вопросы C/C++ 5 28.10.2011 07:54
Объсните что не так делаю Crudelis Общие вопросы C/C++ 4 10.06.2010 00:26