Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   problema con tablex.cancel (https://www.clubdelphi.com/foros/showthread.php?t=69867)

gonza_619 14-09-2010 16:44:51

problema con tablex.cancel
 
hola miren estoy cargando datos a un tabla
ocn boton NUEVO=

Código Delphi [-]
var c:integer;
begin
c:=0;
table1.Last;
c:=table1.fieldbyname('cod_cursoprof').AsInteger;
c:=c+1;
table1.Insert;
table1.FieldByName('cod_cursoprof').AsInteger:=c;
table1.FieldByName('profesor').AsString:=dbedit3.Text;
table1.FieldByName('estado').AsInteger:=1;
dbgrid1.Visible:=true;

bien ahroa cuando por ejemplo quero cancelar la carga antes de el POST (boton guardar)
siempre algunos datos me quedan grbados como el "cod_cursoprof","profesor" como haria para q se borrara todo? utilizo un boton CAnCEL = tablex.cancel
grax

Caral 14-09-2010 18:15:32

Hola
La variable c colocala global.
En el boton Nuevo coloca solo el codigo asignando el valor de c
En el boton guardar coloca el insert y el post.
Saludos

ecfisa 14-09-2010 18:17:04

Hola.

Probá con:
Código Delphi [-]
procedure TForm1.btnCancel(Sender: TObject);
begin
  Table1.Cancel;
  Table1.Refresh
end;

Saludos. :)

gonza_619 15-09-2010 04:32:07

hola no entendi como en el boton GUARDAR poner el POST Y INSERT
es decir inserta una nueva fila y luego al estar asignado el C se guarda lo mismo?, y por q declararlo global a C?

A tambien cuando hago un oncloseup de dblookupcombobox, hago
por ej: table1.fieldbyname(x).asinteger:=table3.fieldbyname(z).asinteger;
eso lo coloco en close up , se asigna pero caundo preisono cancel, aveces sige asignado. sera q es mejor

table1.cancel;
table1.refresh?

se borrara todo?
ademas tengo dudas porq aveces cuando GUARDO , despues al salir dela ejecucion se borra o no lo guarda . por q sera
q deberia poner despues del post ?
grax

Caral 15-09-2010 05:11:00

Hola
Hay un dicho que dice: ''Divide y vencerás'':D:eek:
Saludos


La franja horaria es GMT +2. Ahora son las 08:04:17.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi