Hola
Bueno yo supuse que el control era un TEdit; en tal caso eso ya lo resolviste.
Hice la prueba y me funciona correctamente.
Código Delphi
[-]procedure TForm1.Button1Click(Sender: TObject);
var
S:string;
T:TComponent;
begin
S:='Nada';
T:=FindComponent('DBEdit1');
if Assigned(t)then
S:=(t as TDBEdit).Text;
ShowMessage(S);
end;