Fórum Identificar campo que nao existe na tabela #370533

Bom dia Vagner.Oliveira.

Simples, não sei qual componente que voce está utilizando, porém a maioria deles possui um método para localizar o campo na tabela. Vamos tomar por base o componente TIBQuery da palheta Interbase.



A opção acima no entanto retornará o campo Cliente, como voce quer testar se o campo existe, então voce ainda tem esta opção:

[code]
var I: Integer;
begin
for I := 0 to Pred(IBQuery1.FieldCount) do
if IBQuery1.Fields[I].Name = ´Cliente´ then
....
end;
[code]

tentei usar a funcao que passou, mas nao entendi como ele ira funcionar. Estou usando o Ztable (Zeos componente)

Bom dia Vagner.Oliveira.

Explicando passo a passo:

code]

var I: Integer; // Definindo um contador para o loop For
begin
{ Para cada valor de I que começa com 0 até o Predecessor
do número de campos faça }
for I := 0 to Pred(ZTable.FieldCount) do

{ Se o Nome do Campo na ordem do índice I for igual a
´Cliente´ então execute o código abaixo }
if ZTable.Fields[I].Name = ´Cliente´ then
....
end;

[/code]

O código acima pode ser colocado em qualquer evento OnClick ou qualquer procedure ou function definida por você.

Além disso, eu não conheço muito bem os métodos dos componentes Zeos, mas acredito que tanto o ZTable, ZQuery e ZDataSets devem ter como classe ancestral a classe TDataSet, se assim for, os métodos Fields[] e FieldCount estão presentes no mesmo.