Показать сообщение отдельно
Старый 13.05.2008, 18:35   #8
Пользователь
 
Регистрация: 22.04.2008
Сообщений: 51
Сказал Спасибо: 14
Имеет 36 спасибок в 11 сообщенях
alexsl пока неопределено
По умолчанию

в дополнение к QaK, можно так еще:
Delphi Код:
procedure Init; //Вызывается при включении скрипта begin   MyFile:=TStringList.Create;   try       // тут бы юзать FileExists() - но увы в ФС его нету ИМХО       // пробуем открыть файл      MyFile.LoadFromFile(MyFileName);   except// если ошибка, скорее всего файла нет       // скорее всего у тебя сохранение настроек отдельной проц.       // тоды       MySaveProcedure;      //      //      // или так      ... запись настроек в файл      ...      // теперь сохраняем       MyFile.SaveToFile(MyFileName);   end; end;

Последний раз редактировалось alexsl, 15.05.2008 в 15:38.
alexsl вне форума   Ответить с цитированием
За это сообщение alexsl нажился 4 спасибками от: