Ver Mensaje Individual
  #4  
Antiguo 08-09-2007
Avatar de eduarcol
[eduarcol] eduarcol is offline
Miembro Premium
 
Registrado: ago 2003
Ubicación: En los estados Zulia y Merida de Venezuela
Posts: 4.151
Reputación: 27
eduarcol Va por buen camino
una cosa segun entiendo cada campo tiene el nombre del edit, pero no necesariamente su indice, asi que yo sugeriria algo como :

Código Delphi [-]
var
  I, J: Integer;

begin
    for J := 0 to Pred(Form.ComponentCount) do
      if (Form.Components[J] is TEdit) then
      begin
        TEdit(Form.Components[J]).Text := DataSet.FieldbyName(TEdit(Form.Components[J]).Name).AsString;
      end;
end;

pero para que funcione debe ser cierta la premisa de que el nombre del campo = al nombre del edit
__________________
...Yo naci en esta ribera del arauca vibr@d0r
Soy hermano de la espuma,
de la garza, de la rosa y del sol...
Viva Venezuela
Responder Con Cita