Hola Amigos.
Tengo este codigo :
Código Delphi
[-]
procedure TfrmContacts.btnSaveAddressClick(Sender: TObject);
var
oAdd: TAddress;
ind : integer;
begin
ind := lstAddresses.ItemIndex ;
if oPerson.Addresses.Count > 0 then
begin
oAdd := oPerson.Addresses.Item[ind];
with oAdd do
begin
street:= edtStreet.Text;
postalCode := edtPostalCode.Text;
city := cboCity.Text;
province := cboProvince.Text;
country := cboCountry.Text;
save;
end;
oAdd.Free;
end;
end;
en donde oPerson.Addresses es una clase que deriva de TCollection y TAddress deriva de TCollectionItem, el caso es que la lista se carga de la BD
salen 2 Items y todo lo demas ,hsta ahi perfecto, pero cuando realiza la Accion
me borra el objeto de la Coleccion, es esto normal? No estoy muy acostumbrado a trabajar asi. liberando memoria y demas.,.
el caso es que cada vez que pasa por ahi el codigo, me elimina un elemento de la lista.