Yo usaría
frames. Creas un
frame (File|New|Frame) al que llamas TFrameDiente o como quieras. Dentro colocas tres TEdit y agregas una propiedad pública NumeroDiente:
Código Delphi
[-]
type
TTFrameDiente = class(TFrame)
Edit1: TEdit;
Edit2: TEdit;
Edit3: TEdit;
public
NumeroDiente: Integer;
end;
La conveniencia del Frame es que puedes diseñarlo aparte del formulario y reusarlo tantas veces como quieras en el formulario:
Entonces, tendrías 32
frames de este tipo, uno por cada diente. A la hora de guardar los registros revisas cada
frame y simplemente verificas el valor de cada edit del frame:
Código Delphi
[-]
if (Frame18.Edit1.Text <> '') or (Frame18.Edit2.Text <> '') or (Frame18.Edit3.Text <> '') then
begin
end;
// Saludos