Buenos dias
Perdon si esto ya se ha repetido varias veces, he revisado los hilos que aparecen al respecto pero la verdad no me funciona y soy muy novato en esto, lo que quiero es lo siguiente
tengo un formulario principal Form1 y desde alli con Speedbutton llamo otro formulario, nunca e suna variable para indicar el boton presionado ya que hay 3.
Código Delphi
[-]procedure TForm1.LD1Click(Sender: TObject);
begin
nunca:=1;
with TLisDDI.Create(Application) do
try
ShowModal;
finally
Free;
end;
end;
este me llam un formulario donde tengo un dbgrid y con doble click sobre una de sus celdas llamo otro formulario.
Código Delphi
[-]procedure TLisDDI.Gddi1DblClick(Sender: TObject);
begin
with TLlamInter.Create(Application) do
try
ShowModal;
finally
Free;
end;
Close;
end;
en este otro formulario lo que hago es que llevo el dato de una de las celdas
y calculo un valor con un boton (speedbutton) dependiendo de un factor que se agrega y despues cierro todo.
Código Delphi
[-]procedure TLlamInter.btn1Click(Sender: TObject);
begin
fac := StrToInt(cbb1.Text);
MinVal := StrToFloat(edt3.Text) * fac;
edt2.Text := IntToStr(Round(MinVal));
if Form1.nunca = 1 then
mv1 := StrToInt(edt2.Text);
if Form1.nunca = 2 then
mv2 := StrToInt(edt2.Text);
if Form1.nunca = 3 then
mv3 := StrToInt(edt2.Text);
end;
lo que quiero es poder llevar este valor que es mv1, mv2 o mv3 segun sea el caso al Form1 y guardarlo en otra variable de este formulario.
espero haber sido mas o menos claro y de nuevo disculpas si ya se trato el tema pero la verdad no he podido hacerlo y no comprendo muy bien esto, gracias por cualquier colaboración.