Array
(
)

Asp.net páginas dinamicas

Marlon_fp
   - 11 jan 2006

Alguém sabe como construir o seguinte algoritimo em asp.net

procedure ....Pageload(.......)
var
img ;array of timage;
cont:integer;]
TOPS:INTEGER;
begin
TOPS:=10;
cont:=0;
dataapt.fill(tabela,´produtos´);
tabela.first; // Não consigo ir para first//
setlenght(img,tabela.recordcount);

while not tabela.eof do
begin
img[cont]:=Timage.create;
img[cont].filename:=tabela.tables[produto].columns[´prod_nome´].TOSTRING;
img[cont].NAVIGATEURL:=´DESCRICAO.ASPX?PROD=´+tabela.tables[produto].columns[PROD_CODIGO].TOSTRING;
img[cont].LEFT:=10;//NÃO ACHEI ESTA PROPRIEDADE
img[cont].HEIGHT:=80;//NEM ESTA
img[cont].WHIDHT:=80;/NEM ESTA
img[cont].TOP:=TOPS;
INC(CONT);
TOPS:=TOPS+100;
TABELAS.MOVENEXT;
end;

END;

end;

mEUS PROBLEMAS SÃO
NÃO SEU NAVEGAR NAS TABELAS DO DATASET;
NÃO CONSIGO DAR FIRST,NEXT, EOF;
NÃO CONSIGO DEFINIR O TAMANHO DA ARRAY,
NÃO CONSIGO CAPTURAR O RECORDCOUNT DA TABELA,
NÃO CONSIGO CAPTURAR O VALOR DO CAMPO,
NÃO CONSIGO CRIAR OS TIMAGES NO WEBFORM.

JÁ PROCUREI POR TUDO NA INTERNET E NÃO ACHEI

Rogeriorock
   - 04 out 2006

Cara vc nào vai pro first por que não tem, vc navega na tables assim

table(0)(0) //Primeira linha primeira coluna
table(0)(1) //Primeira linha segunda coluna

table(1)(0) //Segunda linha primeira coluna
table(1)(1) //Segunda linha segunda coluna

no laço vc pode usar

fazer um for contando as linha assim

tables.rows.cont-1

Se bem que com certesa vc pode usar e deve usar for each, não vou por a sintaxe por que estou dando as respostas baseado nas interfaces dos objetos e eu ainda não sei como o delphi implementou for each no VB.net e assim

Dim Linha as DataRow

For Each Linha in Tables.Rows
r(0)//Neste caso vc manipula a linha entáo vc coloca o indece da coluna
next

Imagino que no delphi pode ser algo parecido com isto

Var
Linha:DataRow
Begin

For each Linha in Table.ROws
begin
Manipula do jeito que quer
end;
end;