ActiveDelphi

[brfacil]

Olá!

Estou abrindo uma pagina no webbrowser e quero salvar o endereco da pagina html em um dbedit. Porem nao esta salvando no banco de dados.
ex:c:\teste.html

procedure TfrmCadClientes.btProcuraClick(Sender: TObject);
Var
arq : String;
begin
if (OpenDialog1.Execute) then

arq := OpenDialog1.FileName;
WebBrowser1.Navigate(arq);
Memo1.Lines.Text := GetTextOfSite(Webbrowser1);
edithtml.Text:=arq;


end;


uso delphi tokyo com firebird

[brfacil]

Nenhuma ajuda?

[natanbh1]

Para salvar no banco de dados, não basta passar o valor para o DBEdit.

Você precisa usar o Dataset ligado ao DBEdit para salvar. Veja um exemplo:

[brfacil]

Estou usando desta forma, mas n esta dando certo, não grava no banco de dados. Uso Tokyo com Firebird.
o campo Cli_html um Varchar

procedure TfrmCadClientes.SalvarhtmlClick(Sender: TObject);
Var
arq: String;
begin
if (OpenDialog1.Execute) then
arq := OpenDialog1.FileName;

WebBrowser1.Navigate(arq);
Memo1.Lines.Text := GetTextOfSite(WebBrowser1);
edithtml.Text := arq;

with edithtml.DataSource.DataSet do
begin
Edit;
FieldByName('CLI_HTML').AsString := arq; // Troque "Campo" pelo nome do seu campo
Post;
end;
end;

[natanbh1]

A tabela ligada ao Dataset está aberta?

O DBEdit está ligado corretamente ao DataSource/DataSet?

Faça um teste, acrescentando um Open antes do Edit e trocando edithtml.DataSource.DataSet pelo nome do correto do seu DataSet.

[johnny-walker]

Tente desta forma: