Error: Sobreescribir Formulario ?

[Jesús Pena]

Resulta que tengo la siguiente estructura de código creada

Código Delphi [-]
 frmClientes := nil;
frmClientes := TfrmClientes.Create(Self);
try
frmClientes.pCliente := DBECliente.EditText; //pCliente una propiedad del formulario
frmClientes.ShowModal;
finally
frmClientes.Free;
end;

dicha propiedad está definida de la siguiente forma

Código Delphi [-]
 
bCliente : String;
procedure SetCliente(const Cliente : String);
public
{ Public declarations }
property pCliente:String read bCliente write SetCliente;
.........
.........
.........
procedure TfrmClientes.SetCliente(const Cliente: String);
begin
with dmClientes.IBTClientes do
begin
Insert;
FieldByName('TELEFONO').AsString := Cliente;
Post;
Edit;
end;
end;

La intención es que cuando muestre el formulario si la propiedad tiene algún valor actue en consecuencia (es decir que inserte un registro y el formulario actue en consecuencia). Otra manera que se me ocurre es sobreescribir el métod ShowModal del tipo frmxxxxxx.Showmodal(cliente) pero no sé como hacerlo dado que como lo estoy haciendo me dá un error diciendo que no puede sobreescribir una ventana que está oculta (o algo parecido)