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

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

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

StringGrid и об'екты. [D7, WinXP]

antonn © (2004-12-20 13:10:00)
Здравствуйте мастера! Возник такой вопросик. У меня есть объект который нужно вставить в StringGrid. В ListBox я вставлял так: ListBox.Items.AddObject(Work_log^.s1 , TObject(Work_log)); Со StringGrid так не катит, делаю так:
new(ListTime);
ListTime^.Mode:='232';
ListTime^.time:='23234534';
ListTime^.time1:='4545';
StringGrid1.Objects[0,2]:= TObject(ListTime);

Правильно ли я делаю? Мне кажется это коряво, что должен быть способ лучше.

Семен Сорокин (2004-12-21 10:06:00) [1]

> antonn © (20.12.04 17:22) [5]
> А где их еще можно хранить?

Да хоть в том же массиве (динамическом или статическом - если знаешь размер).

> А то про утечки я слышал, но на опыте не проверял.
> А если программу с утечкой закрыть, память освобождается?

Освобождается

> И чем можно проверять?

MemProof поищи программку в сети.

antonn (2004-12-20 17:22:00) [2]

> PS. Я вообще сторонник того чтобы выделенные объекты/указатели
> держать в отдельном списке (TList) и чистить их там перед
> обновлением.

А где их еще можно хранить? А то про утечки я слышал, но на опыте не проверял. А если программу с утечкой закрыть, память освобождается? И чем можно проверять?

Семен Сорокин (2004-12-20 16:46:00) [3]

> antonn © (20.12.04 15:28) [3]
> ага, а если я уже "объективной" клетке присвою новый объект,
> старый удаляется?
> (StringGrid1.Objects[0,2]:= TObject(ListTime);)

при таком раскладе старый уходит в небытие, и образуется утечка памяти :)
надо так:

if Assigned(StringGrid1.Objects[0,2]) then
Dispose(StringGrid1.Objects[0,2]);
StringGrid1.Objects[0,2]:= TObject(ListTime);

PS. Я вообще сторонник того чтобы выделенные объекты/указатели держать в отдельном списке (TList) и чистить их там перед обновлением.

antonn (2004-12-20 15:28:00) [4]
ага, а если я уже "объективной" клетке присвою новый объект, старый удаляется?
(StringGrid1.Objects[0,2]:= TObject(ListTime);)

tradakad (2004-12-20 14:49:00) [5]
я в ListBox добавлял объекты так

function TfMain.AddToListBox(wTitle:string):boolean;
begin
if FindComponent('CheckBox'+inttostr(i))=nil then
begin
fMain.ListBox1.AddItem(inttostr(i),self);
with TCheckBox.Create(self) do
begin
Name:='CheckBox'+inttostr(i);
Top:=chTop;
left:=75;
height:=20;
width:=500;
Caption:=' '+wTitle;
Checked:=true;
Parent:=fMain.ListBox1;
end;
end;
chTop:=chTop+20;
inc(i);
end;

Семен Сорокин (2004-12-20 14:39:00) [6]
правильно, главное не забывать чистить за собой :)

Наверх

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