Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2013.03.22;
Скачать: CL | DM;

Вниз

Tlist запись и загрузка из файла   Найти похожие ветки 

 
tggbg   (2012-07-27 02:49) [0]

Прошу помощи в написании кода десериализации.
Создан Tlist, нужно чтобы данные сохранялись и загружались потом, нашел код сохранения, но не смог разобраться в нем до конца чтобы написать загрузку данных, прошу помочь в этом деле.
procedure TGridList.Serialize(serializer: TStringList);
begin
 serializer.Add(format("%s///%g", [Number,Price]));
end;

procedure TForm1.Serialize(const filename: string);
var
 serializer: TStringList;
 i: integer;
begin
 serializer := TStringList.Create;
 try
   for i := 0 to List.Count - 1 do
     TGridList(List.Items[i]).Serialize(serializer);
   serializer.SaveToFile(filename);
 finally
   serializer.Free;
 end;
end;


 
Медвежонок Пятачок ©   (2012-07-27 16:25) [1]

нашел код сохранения, но не смог разобраться в нем до конца

напомнило вчерашнее радио.
"купил таблетки для повышения интеллекта, но не смог открыть коробку"


 
Сергей М. ©   (2012-07-27 16:31) [2]


> прошу помочь в этом деле


В каком конкретно - в "разбирательстве" или в "написательстве" ?


 
KilkennyCat ©   (2012-07-27 16:51) [3]

procedure TForm1.LoadSerialize(const filename: string);
var
serializer: TStringList;
i: integer;
begin
serializer := TStringList.Create;
try
  serializer.LoadFromFile(filename);
finally
  serializer.Free;
end;
end;


 
tggbg   (2012-07-27 17:27) [4]

Медвежонок Пятачок, прозвучало как оправдание, нечем помочь - иди мимо.


 
Сергей М. ©   (2012-07-27 20:54) [5]


> tggbg   (27.07.12 17:27) [4]


А ты чем собссно недоволен ?



Страницы: 1 вся ветка

Текущий архив: 2013.03.22;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.056 c
2-1331751635
White
2012-03-14 23:00
2013.03.22
Сбивается БД


2-1332325940
CRLF
2012-03-21 14:32
2013.03.22
А куда делось "Прочее"?


15-1352449269
tur0k_mag
2012-11-09 12:21
2013.03.22
cxTreeList + поле типа Combobox


2-1329076090
dis12345
2012-02-12 23:48
2013.03.22
checkbox в stringgrid


15-1353081080
Артём
2012-11-16 19:51
2013.03.22
нужен совет!