Ver Mensaje Individual
  #11  
Antiguo 19-06-2018
Avatar de ElDioni
[ElDioni] ElDioni is offline
Miembro Premium
 
Registrado: jul 2005
Ubicación: Murcia (España)
Posts: 935
Reputación: 19
ElDioni Va por buen camino
A ver así.

Código Delphi [-]
procedure ColocarNombres();
var
x:integer;
begin
QueryCategorias.First;
x:=1;
While QueryCategorias.Eof=false do
  begin
    TEdit(FindComponent('Edit'+inttostr(x))).Text:=QueryCategorias.Fields[1].AsString;
    inc(x);
    QueryCategorias.Next;
  end;


Saludos.
__________________
Confórmate con lo que tienes pero anhela lo que te falta.
Responder Con Cita