Free a un componente dentro de otro

[thelibmx]

solo una pregunta mas como puedo acceder a los datos que contiene un tdbedit que creé en tiempo de ejecucion y mandarlo a un edit en otro form, el tdbedit se encuentra dentro de un scrollbox y lo he llamado folio pero no logro obtener sus datos,esto lo hago antes de borrar todos los componentes, el codigo que puse es este

Código Delphi [-]

procedure TFrmCap.BitBtn1Click(Sender: TObject);
var
folioc:string;
begin

FormAg.editfolio.Text:= TdbEdit(FindComponent('folio')).Text;

end;

me manda un error de Acces violation at adress, me imagino que no lo encuentra, dentro del dbedit que tengo si hay datos y se encuentra conectado a un datasource, incluso puedo ver los datos que contiene, en tiempo de ejecución,y asigne un evento en el cual le doy click y me muestra en nombre del tdbedit que es folio, no se que me falte o tal ves no sea la manera correcta de obtener los datos..puedes darme una pista?

[ecfisa]

Hola thelibmx.

Suponiendo que le hayas dado un nombre en la creación, ejemplo:

Código Delphi [-]
...
implementation

uses Unit2;

var
  DE: TDBEdit;

procedure TForm1.FormCreate(Sender: TObject);
begin
  DE:= TDBEdit.Create(nil);
  DE.Name:= 'MiDBEdit'; // <- nombre
  DE.DataSource:= DataSource1;
  DE.DataField:= 'Name';
  DE.Parent:= SCrollBox1;
end;

Basta con hacer:

Código Delphi [-]
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
  Form2.Edit1.Text:= (ScrollBox1.FindChildControl('MiDBEdit') as TDBEdit).Text;
end;

Saludos.

[thelibmx]

Gracias por responder ecfisa,me funciono bien, ya pude ver los datos con ese codigo