Справочник функций

Ваш аккаунт

Войти через: 
Забыли пароль?
Регистрация
Информацию о новых материалах можно получать и без регистрации:

Почтовая рассылка

Подписчиков: -1
Последний выпуск: 19.06.2015

INI для filelistbox

24K
25 февраля 2007 года
leonw
4 / / 17.02.2007
Привет всем! прочитал статью про ини. понравилось! только вот как делаю для filelistbox чтение все время выдает ошибку? :confused:
--------------------------
 
Код:
var  i: integer;
begin
Ini:=TiniFile.Create(extractfilepath(paramstr(0))+'myini.ini');
  for i := 0 to FileListBox1.Count-1 do
Ini.WriteString('files', 'base' + IntToStr(i+1), FileListBox1.Directory);
Ini.Free;

------------------------------------------
 
Код:
var
names: TStringList; i: integer;
begin
Ini := TIniFile.Create(ExtractFilePath(ParamStr(0)) + 'myini.ini');
ini.ReadSection('files', names);
for i := 0 to FileListBox1.Count-1 do
filelistbox1.Items.Add(ini.ReadString('files','base', names.Strings ) );
ini.Destroy;
257
25 февраля 2007 года
kosfiz
1.6K / / 18.09.2005
1. надо описать переменную (хотя ты наверное её описал)
 
Код:
var Ini:TIniFile;

2. ты используешь TStringList, но не вызвал Create, надо так:
 
Код:
names:=TStringList.Create;
//твой код
names.Free;

3. используй всегда Free, а не Destroy, так корректнее.

P.S. на будущее: 1) если выдает ошибку, то надо привести текст ошибки; 2) с подобными вопросами сюда http://forum.codenet.ru/showthread.php?t=35391
6
26 февраля 2007 года
George
4.1K / / 05.01.2007
Ты в раздел Uses закинул IniFiles?
24K
26 февраля 2007 года
leonw
4 / / 17.02.2007
Привет! да в Uses положил!!! уже сделал! все читает!!! :)
а можете еще подсказать: как сделать в ини чтобы он деректорию запоминал?
был с:\паскаль прописал с:\1\ после сохранение в ини так и осталось с:\1\
посибо!
Реклама на сайте | Обмен ссылками | Ссылки | Экспорт (RSS) | Контакты
Добавить статью | Добавить исходник | Добавить хостинг-провайдера | Добавить сайт в каталог