[ttotto]

Hola amables amigos

tengo 2 formas , en la primera tengo un dbgrid con un simpledataset y un datasource

ya me conecte y hago mi consulta y de ahi quiero actualizar un dato , el metodo es el

siguiente :

cuando en le dbgrid pongo el foco en algun registro , con un boton pasarme a la forma 2

y de ahi agisnar los valores de mis campos a unos edit y una vez que modifique algunos

datos con un boton mandar mi update a mi tabla , el problema es que no puedo pasar el

valor de la variable de la forma 1 a la forma 2 para que pueda ya estando el forma 2

mande llamar con una consulta el dato y poder mostrarlo en los edit's

pongo mi codigo

forma 1

Código Delphi [-]
  


procedure TForm1.FormCreate(Sender: TObject);
begin
  SimpleDataSet1.Connection:=Form1.SQLConnection1;
  SimpleDataSet1.DataSet.CommandText:='Select * from  posiciones';
  SimpleDataSet1.Active:=True;
  SimpleDataSet1.Refresh;
  SimpleDataSet1.Open;
end;


con esto abro mi forma 2

procedure TForm1.BitBtn1Click(Sender: TObject);
var
  fdos:TForm;

begin
  fdos:=TForm2.Create(Self);
  fdos.ShowModal;
  fdos.Free;
  //numero:=SimpleDataSet1.FieldByName('pos01').AsString;
  end;

forma 2

Código Delphi [-]
procedure TForm2.Button1Click(Sender: TObject);
var
  depto:string;
begin
   SQLQuery1.SQL.Clear;
   SQLQuery1.Close;
   SQLQuery1.SQL.Add('delete from departamento where depto01=:depto');
   SQLQuery1.Params.ParamByName('depto').Value:=Edit1.Text;
   SQLQuery1.ExecSQL;

gracias anticipadas por su respuesta y ayuda