ayuda
Publicado por pilar (22 intervenciones) el 31/07/2006 21:26:37
hola tengo un boton que se llama modificar
cuando le doy modificar puedo modificar pero a la hora de guardar no lo guarda , es dicir que lo tien que reflejar en mi grid pero no lo hace devuelve lo anterior que estaba
ya que como ustedes sabran mi combo tiene tablas y las refleja en un grid y de ahi las refleja en mis cuadros de texto que hago
tablita=thisform.Combo1.value
do case
case tablita="tubocobretl"
esto es porque son varias tablas a las que me refiero por eso utilizo un do case
tablita=thisform.Combo1.value
do case
case tablita="tubocobretl"
if thisform.command4.caption="modificar"
thisform.command1.enabled=.f.
thisform.command2.enabled=.f.
thisform.command3.enabled=.f.
thisform.Text1.enabled=.t.
thisform.Text2.enabled=.t.
thisform.Text3.enabled=.t.
thisform.Text4.enabled=.t.
thisform.command4.caption="guardar"
else
thisform.command1.enabled=.t.
thisform.command2.enabled=.t.
thisform.command3.enabled=.t.
thisform.Text1.enabled=.f.
thisform.Text2.enabled=.f.
thisform.Text3.enabled=.f.
thisform.Text4.enabled=.f.
thisform.command4.caption="modificar"
thisform.Grid1.refresh
endif
thisform.refresh
endcase
cuando le doy modificar puedo modificar pero a la hora de guardar no lo guarda , es dicir que lo tien que reflejar en mi grid pero no lo hace devuelve lo anterior que estaba
ya que como ustedes sabran mi combo tiene tablas y las refleja en un grid y de ahi las refleja en mis cuadros de texto que hago
tablita=thisform.Combo1.value
do case
case tablita="tubocobretl"
esto es porque son varias tablas a las que me refiero por eso utilizo un do case
tablita=thisform.Combo1.value
do case
case tablita="tubocobretl"
if thisform.command4.caption="modificar"
thisform.command1.enabled=.f.
thisform.command2.enabled=.f.
thisform.command3.enabled=.f.
thisform.Text1.enabled=.t.
thisform.Text2.enabled=.t.
thisform.Text3.enabled=.t.
thisform.Text4.enabled=.t.
thisform.command4.caption="guardar"
else
thisform.command1.enabled=.t.
thisform.command2.enabled=.t.
thisform.command3.enabled=.t.
thisform.Text1.enabled=.f.
thisform.Text2.enabled=.f.
thisform.Text3.enabled=.f.
thisform.Text4.enabled=.f.
thisform.command4.caption="modificar"
thisform.Grid1.refresh
endif
thisform.refresh
endcase
Valora esta pregunta
0