Fórum TreeView - ClientDataset - Inserir e Editar #375308
26/09/2009
0
Bom dia. estou engatinhando na programaçao, e estudando sempre, tenho uma treeview para controle de acessos...estou com a seguinte dificuldade...quando tenho a acao Ticada na treeview, faco a comparacao com o banco. se existir trabalho somente alterando para V ou F...o problema esta quando nao existe a acao para o usuario no banco, entao tenho que inclui-la...ja tentei de varias formas e nao consegui entra num loop axo...
Estou tentando seguir esta logica
for i:=0 to TreeView.Items.Count -1
begin
dataset.close;
dataset.open;
dataset.first;
while not dataset.eof do
begin
if (item[i].text = datasetcaption.text)
begin
//edit;
end;
if (item[i].text <> datasetcaption.text)
begin
//inclui;
end;
dataset.next;
end;
Alguem poderia me ajudar...esta correto percorrer o dataset dentro do if da treeview ?
Estou tentando seguir esta logica
for i:=0 to TreeView.Items.Count -1
begin
dataset.close;
dataset.open;
dataset.first;
while not dataset.eof do
begin
if (item[i].text = datasetcaption.text)
begin
//edit;
end;
if (item[i].text <> datasetcaption.text)
begin
//inclui;
end;
dataset.next;
end;
Alguem poderia me ajudar...esta correto percorrer o dataset dentro do if da treeview ?
Flast2008
Curtir tópico
+ 0
Responder
Posts
26/09/2009
Afarias
vc não tem q percorrer o DataSet. Para isso existem métodos como FindKey e Locate, um exemplo:
T+
var
Valor: string;
begin
DataSet.Close;
DataSet.Open; // prepara o dataset
for i := 0 to TreeView.Items.Count-1 do
begin
Valor := TreeView.Item[i].Text;
if DataSet.Locate(´CAPTION´, Valor, []) then // se existe o ´caption´
begin
DataSet.Edit; // editar
{...}
end else // se não
begin
DataSet.Append; // incluir
{...}
end;
end;
end;
T+
Responder
Gostei + 0
28/09/2009
Flast2008
Mais uma vez muito obrigado pela Ajuda amigo...Vlew dmais....
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)