Como usar el evento OnDataChange

[ivantj24]

Disculpen de nuevo la molestia pero no me logra salir de esto, tuve que cambiar todos los TEdits por DBEdits para permitir percibir el cambio que en ello sse genere para que el DataSource pudiera realizar los cambios de estado en si, pero no me sale, lo que primero quiero hacer es:

como trabajo como ventanas MDI

1.- que al abrir una ventana, el DataSource de esa ventana se ponga en estado Edit o Inactivo, lo que sea, como me pasaron todos los estado y en ayudas tambien estan, intente poner esto,

procedure TfrmPrincipal.AltadeEstacion1Click(Sender: TObject);
begin
Application.CreateForm(TfrmEstacion, frmEstacion);
frmEstacion.DataSourceEstacion.State:= dsInactive;
frmEstacion.Show;
end;

en esta linea en negrita que marco se que existe un error pero no me explico por que,
bueno esto es solo al querer poner en un estado el DataSource, mientras que en el DataSource en su evento OnDataChange para que me detecte los cambios pongo condiciones para que al percibir varios estados del DataSource vaya habilitando o no los botones

procedure TfrmEstacion.DataSourceEstacionDataChange(Sender: TObject;
Field: TField);
begin
if DataSourceEstacion.State = dsInsert then
begin
btnAceptar1.Enabled:= True;
//Todos los botones que inhabilito y habilito
end
end;

Pero no entiendo como es posible darle un estado al DataSource desde fuera, ya que como les decia si uso

DataSourceEstacion.State:= dsInsert;

no me permite hacerlo, o con cualquier otro estado, no lo puedo poner en ese modo de Edicion, asi que no lo puedo hacer, espero alguien me explique, ahora mismo estoy buscando por la web alguna solucion pero no he encontrado, espero me ayuden con esto, gracias

[Casimiro Noteví]

Tienes confundido los conceptos, fíjate en los ejemplos que ha puesto rgstuamigo.
Si quieres editar haces:

Código Delphi [-]
datasource.dataset.edit;

Si quieres insertar un registro:

Código Delphi [-]
datasource.dataset.append;

si quieres no hacer nada:

Código Delphi [-]
datasource.dataset.cancel;

El estado se pone automáticamente, no tienes que ponerlo tú.

[ivantj24]

ah ok ok entendido muchas gracias por las molestias, solo una cosa, si no esta haciendose nada, al momento de crear la ventana el estado del DataSource supongo esta en Inactive, lo que puse fue

procedure TfrmEstacion.DataSourceEstacionDataChange(Sender: TObject;
Field: TField);
begin
if DataSourceEstacion.State = dsInactive then
begin
btnAceptar1.Enabled:= True;
end
end;

y por default yo puse ese boton como Inactivo por lo que al poner el estado del DataSource en el evento Oncreate de la forma de est aforma

DataSourceEstacion.DataSet.Cancel;

lo cual supongo no hace nada, o esta en inactivo el datasource y no se cumple mi condicion, la cual es poner el boton aceptar en habilitado, no se si estoy confundido o estoy equivocado, esto es para al momento de entrar, que algunos botones por default esten deshabilitados pero no se como poner el DataSource en modo Inactivo o cancel, muchas gracias

[Casimiro Noteví]

Normalmente cuando no está "haciendo nada" está en dsBrowse

[ivantj24]

ah ok ok probare ahora mismo muchisimas gracias :P

[ivantj24]

no se si sea mucha molestia, o exista algun documento en la web o algun archivo o lo que fuera de referencia para ententer que estado del DataSet se relacion con el estado del DataSource algo asi como lo que me acaba de pasar casimiro

DataSourceEstacion.DataSet.Cancel; = dsBrowse
DataSourceEstacion.DataSet.Edit; = dsEdit
DataSourceEstacion.DataSet.Insert = dsInsert

pero no entiendo cual relacio habra con los demas estados del DataSource

TDataSetState = (dsInactive, dsBrowse, dsEdit, dsInsert, dsSetKey,
dsCalcFields, dsFilter, dsNewValue, dsOldValue, dsCurValue, dsBlockRead,
dsInternalCalc, dsOpening);

estos que me pasaste con los del DataSet no se cual se relaciona con cual, si me podrias decir o mencionar de que documento los puedo ver para relacionarlos asi no molesto mas muchas gracias

[Casimiro Noteví]

dsInactive supongo que es cuando está cerrado el dataset, el resto jamás los he tenido que usar en los últimos 13 años
Pero prueba a buscar por cada uno aquí en clubdelphi por si alguna vez alguien ha comentado algo al respecto.