Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Сохранять значения в ListView [D7, XP]

Страницы: 1 2 >
ЧиЧиЧи © (2006-03-15 15:18:00)
Добрый день! Скажите, можно ли хоть как-то сохранять значения в ListView? В виде файла например. Если прогу закрыть то все пропадает, а жаль! Мне нужно именно этот компонет сохранять.

vovnuke (2006-03-15 20:01:00) [1]
Delphi\Help\d7.hlp -> TClientDataSet -> Useng TClientDataSet

ЧиЧиЧи (2006-03-15 19:53:00) [2]
Судя по всему, у тебя типа таблицы. С БД связываться не охота, а красиво сделать хочется ?
Листвью для этой цели не самый хороший выход, ибо он "не умеет" сортировать, фильтровать, переставлять метсами колонки и менять их свойства.

Попробуй TClientDataSet в связке с TDataSource и TDBGrid

Вообще-то так. Хочу написать типа базы данных.

Попробуй TClientDataSet в связке с TDataSource и TDBGrid

Вы хотите сказать, что таблицу предварительно создавать не нужно?
Просто связать друг с другом и все?
А как же быть с полями? Если просто "так" создать, то будут трудности, наверное...
Если не затруднит, то подскажите пожалуйста, как правильней поступить.

Fenix (2006-03-15 18:41:00) [3]
Перед использованием создай объект S.

s:=TStringList.Create();
потом можешь работать с ним и не будет ошибок.
Когда он тебе будет не нужен вызови
s.frree;

msguns (2006-03-15 17:40:00) [4]
Судя по всему, у тебя типа таблицы. С БД связываться не охота, а красиво сделать хочется ?
Листвью для этой цели не самый хороший выход, ибо он "не умеет" сортировать, фильтровать, переставлять метсами колонки и менять их свойства.

Попробуй TClientDataSet в связке с TDataSource и TDBGrid

Leonid Troyanovsky (2006-03-15 17:39:00) [5]

> ЧиЧиЧи (15.03.06 17:32) [29]

> Просто ужасно хочется понять, как это можно сделать :((

Чего там сложного, открываешь нужную страницу (по оглавлению)
и читаешь. Можно и картинки смотреть, все почти как в браузере.

--
Regards, LVT.

ЧиЧиЧи (2006-03-15 17:32:00) [6]
Прошу прощения!
Просто ужасно хочется понять, как это можно сделать :((

Leonid Troyanovsky (2006-03-15 17:24:00) [7]

> ЧиЧиЧи (15.03.06 17:13) [27]

Чего, ты еще тут? Ну-ка, быстро за книжку.
RTFM: constructor Create and so on.

--
Regards, LVT.

ЧиЧиЧи (2006-03-15 17:13:00) [8]
Че, пепси надоело?

Плохиш (2006-03-15 17:12:00) [9]
Мдя, поколение пепси.

Leonid Troyanovsky (2006-03-15 17:12:00) [10]

> ЧиЧиЧи (15.03.06 17:09) [24]

> Как же так?

Такова природа вещей.

--
Regards, LVT.

ЧиЧиЧи (2006-03-15 17:09:00) [11]
Как же так?
s: TStringList - не считается?

Он же описан и используется ?

Плохиш (2006-03-15 17:07:00) [12]

> ЧиЧиЧи (15.03.06 17:04) [22]

Все объекты до использования должны быть созданы. Пора уже книжку-какую купить :-(

ЧиЧиЧи (2006-03-15 17:04:00) [13]
Не получается :(
Вылезает какая-то ошибка. Привожу фрагменты:
EAccesVialation with message "Acces vialation at address 004A5C3A" in modele "proga.exe". Read address 8BD88B8B....

Комполятор почему-то ругает строку:
s.Add(listview1.Column[k].Caption);

что тут можно сделать?

clickmaker (2006-03-15 17:01:00) [14]

> ЧиЧиЧи (15.03.06 16:51) [19]

че-то каша какая-то... этот код по идее вообще не должен компилироваться, не говоря о том, что объект s вообще не создается

grisme (2006-03-15 16:56:00) [15]
ЧиЧиЧи (15.03.06 16:51) [19]
procedure TForm1.Button3Click(Sender: TObject);
var
k: integer;
s: TStringList;
begin
for k:=0 to ListView1.Items.Count-1 do
begin
s.Add(listview1.Column[k].Caption);
s.Add(listview1.Items.Item[k].SubItems.text);
end;
s.SaveToFile('C:\myfile.txt');
end;

ЧиЧиЧи (2006-03-15 16:51:00) [16]
Мастера, я сейчас немного поразбирался, короче докатился вот до этого:

procedure TForm1.Button3Click(Sender: TObject);
var
k: integer;
s: TStringList;
begin
for k:=0 to ListView1.Items.Count-1 do begin
s.Add(listview1.Column[1].Caption);
s.Add(listview1.Items.Item[1].SubItems.text);
s.SaveToFile('C:\myfile.txt');
end;

Но что-то ничего не происходит :((

ЧиЧиЧи (2006-03-15 16:29:00) [17]
Ok! Пробую... Пока ничего не получилось. Но копать продолжаю :)

Fenix (2006-03-15 16:20:00) [18]
TStringlist задаеться так:
....
Var
S:TStringList;
....
Потом допустим, что бы добавить запись пишеш
s.add('<что добавить>');
он имеет структура наподобие мемо.

clickmaker (2006-03-15 16:17:00) [19]

> люблю учиться на примерах и подсказках других

кто ж мешает? Delphi7\Demos\...

ЧиЧиЧи (2006-03-15 16:15:00) [20]
жаль конечно, что не удалось узнать что-нить полезно для себя про этот компонент. Учиться сложно конечно, но желанеи есть :)
Мне интересно (точнее) люблю учиться на примерах и подсказках других. так легче для понимания (моего) :)

Страницы: 1 2 >

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »