ini (опять он :) ) и tmemo

[skalt12]

приветствую всех.. .собственно, такая проблема, нужно из файла *.ini достать нужную информацию, некоторые моменты не получаются, сейчас поясню какие.

содержимое файла *.ini выглядет таким образом:

[Понедельник]
текст
[Вторник]
текст2
...
[Воскресенье]

текст7

на форме в приложении раскиданы Memo1 (Отвечает за сегодня) и Memo2(отвечает за завтра). Нужно, чтобы в Memo1 из файла *.ini читались данные из секции, соответствующей сегодняшнему дню, а в Memo2, соответственно, завтрашнему. Делаю так:

uses IniFiles, DateUtils;
procedure TForm1.FormCreate(Sender: TObject);
  var
    ini: TIniFile;
    n: integer;
    Str: TStringList;
    tod,tomm: String;
  begin
         ini := TIniFile.Create(ExtractFilePath(Application.ExeName)+'stable.lst');
         tod := FormatDateTime('dddd',Date);
         tomm := FormatDateTime('dddd',Date+1);
         Memo1.Clear;
         Memo2.Clear;
         Str := TStringList.Create;
         ini.ReadSectionValues(tod,str);
         for n:=0 to str.Count do
         Memo1.Lines.Add(ini.ReadString(tod,inttostr(n),''));
         ini.ReadSectionValues(tomm,str);
         for n:=0 to str.Count do
         Memo2.Lines.Add(ini.ReadString(tomm,inttostr(n),''));
         str.Free;
         ini.Free;
end;

в моем случае отображается только данные из секции, соответствующей сегодняшнему дню (для Memo1), а в Memo2 ничего не отображается..

Подскажите, пожалуйста, что подправить.. буду очень признателен

[W0LF]

Ну так раз вы подключили DateUtils так и используйте Tomorrow, она возвращает завтрашнюю дату

[skalt12]

Сообщение от W0LF

Ну так раз вы подключили DateUtils так и используйте Tomorrow, она возвращает завтрашнюю дату

ды пробовал, но не получается.. делфи говорит, что сей идентификатор ей неизвестен

p.s. перепроверил, на Tomorrow не ругается (видимо, ошибка где-то была) а в Memo тем не менее не выводит и с Tomorrow

[skalt12]

неужели никак невозможно обойти?

[Alex2009]

Можно сейчас дам исходник только напишу.

[skalt12]

Сообщение от Alex2009

Можно сейчас дам исходник только напишу.

буду очень признателен