Календарь, папки, файлы и трей

[northener]

Сообщение от Kix.IV

Если система Vista и выше, то лучше забудьте про Program Files. Пишите в папку пользователя(%AppData%\ProgramName) .

Одно маленькое замечание/добавление.
В чём разница между папками Мои документы и Application Data?

[Techno Bot]

Действительно по большинству пунктов есть что нагуглить... Каюсь.

Но первый вопрос интересует очень остро...

Изначально я задумывал харнить все в SQLite.. но поскольку мало опыта для прототипа сделал папки.

Вот что есть на данный момент.

procedure TForm1.BitBtn1Click(Sender: TObject);
 var
   Way,StrDate,StrTime:string;
   i:Integer;
   Fil:TextFile;
begin
Way:='D:\2013\story\';

StrDate:=DateToStr(Date);
 if   not DirectoryExists(Way+StrDate) then CreateDir(Way+StrDate);
StrTime:=TimeToStr(Time);

 for i:=1 to Length(StrTime)  do
 if StrTime[i]=':' then  StrTime[i]:='-';

 Way:=Way+StrDate+'\';
 if not FileExists(Way) then
  begin
   StrTime:=StrTime+'.txt';
   AssignFile(Fil,Way+StrTime);
   Rewrite(Fil);
    WriteLn(Fil, Memo1.Text);
   CloseFile(Fil);
  end;
 end;

Если покажете как сделать запись в базу, а потом с помощью календаря вывести все это дело в таблицу, буду очень признателен, с меня все то что так любил Бендер помимо блекджека

Но и для работы с обычными файлами тоже пример конечно будет хорошим...

Совсем не много умею проектировать BD прикрутить категории к записям надеюсь что смогу сам. Т.е. не обязательно что бы базу с полями изначально создавал Delphi. Описать структуру и связи смогу в SQL Expert... Важно подключиться к бд сохранить и вывести запись с помощью календаря.

[Kix.IV]

http://sqlite4delphi.sourceforge.net/download.html
www.google.ru/search?q=SQLite+delphi