Sencillamente utilizá el evento
OnDblClick del Edit en cuestion y dentro poné el siguiente código:
Código Delphi
[-]procedure TForm1.Edit1DblClick(Sender: TObject);
begin
Edit1.SelectAll;
end;
Saludos...

__________________
"Pedid, y se os dará; buscad, y hallaréis; llamad, y se os abrirá." Mt.7:7