Asp.net páginas dinamicas
11/01/2006
0
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
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
Marlon_fp
Curtir tópico
+ 0
Responder
Posts
04/10/2006
Rogeriorock
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;
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;
Responder
Clique aqui para fazer login e interagir na Comunidade :)