Marcos, Nao sao liberados com FreeAndNil no Form e nem quando encerro a aplicacao. Ha um erro de Memory Leak.
Obrigado. MuriloCunha On 03/05/2010 11:25, Marcos Douglas wrote: > 2010/5/3 Murilo Cunha<mcscu...@yahoo.com.br>: > >> Pessoal, >> >> Tenho esta estrutura para guardar mais de um valor no ComboBox: >> >> cbxUsuarios.Properties.Items.AddObject(dtsOracle.FieldByName('LOGIN').AsString, >> TObject(dtsOracle.FieldByName('ID_USUARIO').AsInteger)); >> >> Para recuperar este valor faco o seguinte: >> >> intIDUsuario := >> LongInt(cbxUsuarios.Properties.Items.Objects[cbxUsuarios.ItemIndex]); >> >> O problema estah em: Como liberar estes objetos da memoria? >> >> Nao sei fazer o FREE para esta estrutura. >> > Não é necessário liberar memória no _seu_ caso. > Como os objetos são TField, estes serão liberados com o DataSet > (Query, Table, etc) for liberado (pelo Free do Form ou por vc). > O método AddObject apenas guarda o "ponteiro de memória" do objeto passado. > > -- > Marcos Douglas > > > ------------------------------------ > >