la primera busca un registro cuyo campo CodZona sea igual al campo Origen
una vez encontrado el registro
la segunda asigna a un componente TdbLookupComboBox el valor del primer campo en el registro encontrado dentro la tabla
__________________
self.free;
|