Guardar muchos muchos Tedit

[el-mono]

Hola gente voy explicar mi problema espero ser claro.

Estoy desarrollando un sistema Oontologico y me quede trabado en lo que se llama FICHA PERIODENTAL que funciona asi:

Tengo 96 TEdit cada 3 TEdit corresponden a la primer pieza Dentaria los tres siguientes a la siguiente pieza dentaria y asi hasta completar todas las piezas dentarias , en los TEdit se escriben Numeros.

Lo que necesito es un procedimiento que se dispare al presionar el boton guardar y que controle que si al menos uno de los 3 Edit tiene un valor crear un registro en una tabla asi:

NroDiente Valor1 Valor 2 Valor 3

18 TEdit1 TEdit2 TEdit3
36 TEdit2 TEdit2 TEdit3
48 TEdit3 TEdit3 TEdit3

Si ninguno de los 3 TEdit que se corresponden a unapieza dentaria no crtear niungun registro. Utilizo Delphi 7, Firebird 2.1 y DBX para conexion.

Quizas con esto se entienda mas:

mi problema es que debo comprobar los 3 TEdit que pertenecen al Diente y recien si alguno de los tres tiene algo
grabar un registro para ese diente por ejemplo:

Diente 18
Edit1 := 5;
Edit2 := 0;
Edit3 := 0;

Diente 36
Edit1 := 0;
Edit2 := 0;
Edit3 := 0;



En la tabla debo de guardar los tres Edit asi:

Diente Dato1 Dato2 Dato3

18 5 0 0

Para el diente 36 Ningun registro y asi con todos.


Esperando una respuesta pronto y hallan entendido y ser claro.
Saludos
Mario