Bloquear edição

Delphi

12/03/2003

Após o usuário editar o valor pago, como faço para bloquear a edição no registro? Estou usando paradox e table.


Consorte

Consorte

Curtidas 0

Respostas

Ggean

Ggean

12/03/2003

Para evitar alteracao na tabela basta colocar a propriedade readonly=true
para aceitar novamente coloque readonly=false
table1.readonly:=true;//somente leitura
table1.readonly:=false;//leitura e gravacao

eu acho que vc pode usar assim
na hora de gravar o que o cara digitou

table1.readonly:=false;//leitura e gravacao
.
.
Grava tudo aqui
.
.
table1.readonly:=true;//somente leitura



boa sorte!


Gean Carlos.


GOSTEI 0
Consorte

Consorte

12/03/2003

Mas aí não trava todos os registros, ou só ativa a propriedade readonly=true do campo no fields?


GOSTEI 0
Consorte

Consorte

12/03/2003

Após o usuário editar o valor pago, como faço para bloquear a edição no registro? Estou usando paradox e table.

Mas aí não trava todos os registros, ou só ativa a propriedade readonly=true do campo no fields?


GOSTEI 0
Anonymous

Anonymous

12/03/2003

Depois que vc digitar o valor ele será salvo automaticamente ???

Nenhum outro campo poderá ser editado ????

Não entendi muito bem sua pergunta .......


GOSTEI 0
Consorte

Consorte

12/03/2003

É o sequinte, o programa é um controle de inscrição na Divida Ativa, após o pagamento do débito, o registro é salvo através do button (salvar) e este registro não poderá ser editado, os outros registros continuam em aberto, pois ainda consta o débito.


GOSTEI 0
Anonymous

Anonymous

12/03/2003

Para tal eu criei mais um campo na tabela para esse controle !


GOSTEI 0
Anonymous

Anonymous

12/03/2003

crie um campo boolean na sua tabela e após o pagamento do débito você edita esse campo e coloque em true.

quando voce for editar novamente, verifique se esse campo está false.

if (tabelaNomedoCampo.assboolean) then begin
showmessage(´Pagamento já efetuado´.);
abort;
end;


GOSTEI 0
Consorte

Consorte

12/03/2003

Campo Boolean?, desculpe :oops: não sei ainda po que é?
me explique, por favor. Valeu.


GOSTEI 0
Anonymous

Anonymous

12/03/2003

Expliquei mal.

É um campo Logical (L) no DataBase Desktop


GOSTEI 0
POSTAR