Tranferir dados de Form Para outro.....
Estou com problema onde presciso que um Form1 ativa as tabelas do Form2, dá um Insert nesta mesma tabela e tranfira os dados contidos no Form1 para o Form2....
na forma explicada abaixo não funciona direito...os até vão para o Form2, más por algum motivo quando salva ele prevalesse o registro anterior.....
_FormContas := T_FormContas.create(application);
_FormContas.Table1.Close;
_FormContas.Table1.Open;
_FormContas.Table1.Insert;
_FormContas.ComboBox1.text := Table1Nome.value;
_FormContas.DBEdit4.Text := Table1Endereco.value;
_FormContas.DBEdit1.Text := Table1Complemento.value;
_FormContas.DBEdit6.Text := Table1Bairro.value;
_FormContas.DBEdit7.Text := Table1Cidade.value;
_FormContas.DBEdit2.Text := Label14.Caption;
_FormContas.DBComboBox1.Text := ´O.S. ´ + Table1Descricao.value;
_FormContas.showmodal;
Obrigado pela ajuda....
na forma explicada abaixo não funciona direito...os até vão para o Form2, más por algum motivo quando salva ele prevalesse o registro anterior.....
_FormContas := T_FormContas.create(application);
_FormContas.Table1.Close;
_FormContas.Table1.Open;
_FormContas.Table1.Insert;
_FormContas.ComboBox1.text := Table1Nome.value;
_FormContas.DBEdit4.Text := Table1Endereco.value;
_FormContas.DBEdit1.Text := Table1Complemento.value;
_FormContas.DBEdit6.Text := Table1Bairro.value;
_FormContas.DBEdit7.Text := Table1Cidade.value;
_FormContas.DBEdit2.Text := Label14.Caption;
_FormContas.DBComboBox1.Text := ´O.S. ´ + Table1Descricao.value;
_FormContas.showmodal;
Obrigado pela ajuda....
Gigatel
Curtidas 0
Respostas
Lucas Silva
25/05/2004
Tenta atribuir os valores desta forma
_FormContas.DBEdit4.Field.AsString := Table1Endereco.value;
GOSTEI 0
Nigro
25/05/2004
Ao invés de Insert, dê um append
GOSTEI 0