اگر منظورتون اينه كار نمي كند

for i:=0 to DynamicForm.ControlCount -1 do
if DynamicForm.Controls[i]is TDBEdit then
begin
TDBEdit(DynamicForm.Components[i]).OnMouseMove := First_nameMouseMove;
end;