Mi problema es el siguiente, tengo un form principal que se crea con el proyecto al ejecutarse, bien, desde este form creo en tiempo de ejecucion todos los otros forms de la forma
Código Delphi
[-]
procedure TFPrincipal.Consultacirc1Click(Sender: TObject);
var
cons:TFConsultaCirc;
begin
cons:=TFConsultaCirc.Create(self);
cons.Show;
end;
cuando cierro el form en el onclose hago la action:=caFree.
Bueno, el problema viene aqui, en este form que creo en tiempo de ejecucion tengo una variable publica para accederla desde otro form que lo muestro como showmodal, de esta forma
Código Delphi
[-]
type
TFConsultaCirc = class(TForm)
DBGrid1: TDBGrid;
BEliminar: TButton;
.
.
.
public
env_devs:integer;
end;
.
.
.
procedure TFConsultaCirc.BEliminarClick(Sender: TObject);
var
adv:TFAdvierteBorraCirculante;
begin
adv:=TFAdvierteBorraCirculante.create(self);
if adv.showmodal=mrYES then
begin
.
.
.
end;
y este es el codigo del form que llamo con showmodal
Código Delphi
[-]
if ECantidad.Text<>''then begin
FConsultaCirc.env_devs:=strtoint(ECantidad.Text);
ModalResult:=mrOK;
end
else
showmessage('Ingrese la cantidad de envases');
pero al llegar a la asignacion me da el error 'Access violation ...', ahora mi pregunta; como hago referencia a esta variable del otro form? se que mi problema es por crearlo en tiempo de ejecucion ya que si lo creo cuando se ejecuta la aplicacion hago referencia a ella y listo, pero quiero saber como trabajar con los forms creados de esta manera. Espero haber sido claro, disculpen cualquier error ya estoy un poco perdido y cansado con este rollo.
Gracias
Fede