Validar Registro de Datos en una BD

[hal1967]

Frank algo que no tiene que ver con BB DD. Es "if" que colocaste debería estar separado en dos partes dado que estás tratando de evaluar el mismo objeto como dos clase distintas (en principio no debe haber problemas porque ambas deben descender de algo como TCustomEdit, pero el operador "as" es bastante quisquilloso).

En todo caso separa

en lugar de

if A or B then


algo como

if A then.....
if B then....


Tu problema es en el segundo "if"

Empezado por Franfarnaz

for x := 0 to ComponentCount - 1 do

if ((Components[x] is TDBEdit) or (Components[x] is TDBLookupComboBox)) then begin
if (((Components[x] as TDBEdit).Text = '') or ((Components[x] as TDBLookupComboBox).Text = '')) then