Fórum Tranferir dados de Form Para outro..... #234210
25/05/2004
0
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
Curtir tópico
+ 0
Responder
Posts
25/05/2004
Lucas Silva
Tenta atribuir os valores desta forma
_FormContas.DBEdit4.Field.AsString := Table1Endereco.value;
Responder
Gostei + 0
25/05/2004
Nigro
Ao invés de Insert, dê um append
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)