Como validar con una DBgrid...

[jachguate]

Seguramente no ha sido creada la forma la primera vez que se ejecuta el código. Bastaría añadir un IF al método EstadoEtiq para verificar que la variable frmEtiquetas no sea nil.

En particular, este tipo de manipulación de componenetes visuales, y principalmente para evitar las referencias en el módulo de datos a formas, yo me valgo del evento OnDataChange del DataSource.

Hasta luego.



Hasta luego;

[uper]

saludos,
comento que ya realice unos cambios para comprobar si es frmEtiquetas no sea nil, y para los dos eventos tanto OnDataChange como onAfterscroll ya no da error, coloque las sig. lineas probando en uno de los dos eventos, solo me queda una duda.

procedure TBD.dsEtiquetasDataChange(Sender: TObject; Field: TField);
begin
if frmEtiquetas = nil then
frmEtiquetas := TfrmEtiquetas.Create(nil);
frmEtiquetas.Show;
// frmEtiquetas.ShowModal;
estadoEtiq;
end;
Si mi forma es showmodal me da un mensaje: cannot make a visible windows modal, en caso contrario con Show puedo ver mi form sin problemas, ¿Hay alguna manera de que pueda mostrar mi form en showmodal?


gracias

[jachguate]

De alguna manera la forma ya está visible cuando llamas a ShowModal. Revisá tus fuentes o seguí la ejecución con el depurador para determinar en que momento se hace una llamada a Show y eliminala.

Hasta luego.

[uper]

hola,

pues no esta visible la form al llamarla desde el menu por decirlo, la hago desde el evento OnDataChange de DataSource.
en el menu Eiquetas solo abro las tablas:
TfrmVentasInnova.acEtiquetasExecute(Sender: TObject);
begin
ibEtiquetas.open;
end;

Existe alguna manera asignar una forma a showmodal desde el modulo de datos ?

gracias

[roman]

Revisa la propiedad Visible del formulario en el inspector de objetos y asegúrate de que esté en false.

// Saludos

[uper]

Saludos

tengo una duda, hay en un menu que uno se refiere a llamar a etiquetas y otro a ordenes, estoy observando que en ordenes tiene relacion con otras tablas entre ellas etiquetas y ordenes.. para el primer caso de llamar una forma desde un modulo de datos, lo que unico que se me ocurrio es hacer una llamada a la forma que se cree y se muestre en forma.Show sin embargo ahora que estoy viendo que en el menu de ordenes esta tabla hace relacion con otras, al entrar a esta opcion se ejecutan las dos pantallas primero Frmetiquetas y luego Ordenes al realizar una busqueda en frmEtiqueta se queda inmovil, por que se ejecuto antes de que yo realizara la busqueda.

procedure TBD.dsEtiquetasDataChange(Sender: TObject; Field: TField);
begin
if frmEtiquetas = nil then
frmEtiquetas := TfrmEtiquetas.Create(nil);
frmEtiquetas.Show;
// frmEtiquetas.ShowModal;
estadoEtiq;
end;
Como en este evento datachange tiene definido que se creee la forma de etiquetas, cuando voy al menu de ordenes me trae con sigo tambien la form_etiquetas
se puede hacer algo para que no se ejecute sino hasta que uno se le indique
en este caso al realizar una busqueda,
gracias.