Fórum INCLUIR VÁRIOS REGISTRO DE UMA SÓ VEZ... LOOP #174102
09/08/2003
0
Gostaria de saber se altem pode me ajudar a fazer um loop que cadastre 100 registros em uma tabela apenas para fazer um teste... para ver o camportamento da tabela.
explicando:
Tenho uma tabela i quero fazer um loop que cadastre vários registros nessa tabela apenas clicando sobre um tbutton?
ficarei grato para quem ajudar...
O poder de decisão é uma virtude!
explicando:
Tenho uma tabela i quero fazer um loop que cadastre vários registros nessa tabela apenas clicando sobre um tbutton?
ficarei grato para quem ajudar...
O poder de decisão é uma virtude!
Paulo Ricardo
Curtir tópico
+ 0
Responder
Posts
09/08/2003
Ivonei
Acho que poderia ser mais ou menos assim:
Var
I:Integer;
begin
I:=100;
while I>=0 do
begin
Dec(I)
Table1.append;
Table1CampoNome:=´Nome´;
Table1.post;
end;
end;
Veja se funciona. :)
Var
I:Integer;
begin
I:=100;
while I>=0 do
begin
Dec(I)
Table1.append;
Table1CampoNome:=´Nome´;
Table1.post;
end;
end;
Veja se funciona. :)
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)