Tengo una aplicación que llama a una pantalla de consulta, que a su vez debe llamar a una pantalla de detalle y "desaparecer" la pantalla de consulta, bajo éste esquema:
Aplicación
|
|
_______ Pantalla de consulta
|
|
______ Pantalla de detalle.
Como dije, la pantalla de consulta, al momento de llamar a la pantalla de detalle, debe desaparecer, preferentemente ser cerrada, para que no se esté ejecutando al mismo tiempo que la pantalla de detalle.
La llamada de la pantalla de consulta:
procedure TFrmPrn.ConsultadeExtorsinTelefnica1Click(Sender: TObject); begin try inherited; with TfrmCnsltrDnncs.Create(Self) do ShowModal; except on E: Exception do begin ShowMessage(E.Message); end; end; end;
La llamada de la pantalla de detalle (Y aquí es donde reside la duda o problema):
procedure TfrmCnsltrDnncs.dbgrdDtsDblClick(Sender: TObject); begin with TfrmCapExt.Create(Self) do <----- ¿Posible problema? begin TpoUsr(sTpoUsr); RecbrDts(dbgrdDts.Columns.Items[0].Field.Value); Show; end; frmCnsltrDnncs.Close; <------ Arroja un error de excepción end;
Como siempre, alguna idea por loca que parezca u oreintación respecto a la resolución del problema será bienvenida. Agradeciendo de antemano.