Código Delphi [-]procedure TVentas.ButtonAbrirDetallesClick(Sender: TObject); begin Detalles.Show; Ventas.Enabled:= False; end; //formulario detalles procedure TDetalles.FormClose(Sender: TObject; var Action: TCloseAction); begin Ventas.Enabled:= True; end;
procedure TVentas.ButtonAbrirDetallesClick(Sender: TObject); begin Detalles.Show; Ventas.Enabled:= False; end; //formulario detalles procedure TDetalles.FormClose(Sender: TObject; var Action: TCloseAction); begin Ventas.Enabled:= True; end;