marcio1361303176 Posted August 3, 2011 Report Share Posted August 3, 2011 Amigos estou migrando um cliente novo de autopeças e ele tinha um sistema em delphi, que faz a cotação de preços de varios fornecedores e varios produtos. Dai é digitado os preços de cada fornecedor. Apos isso o sistema separa os ganhadores das cotaçoes. Ele exibe um browse com os fornecedores vencedores em destaque conforme abaixo. Ele cria um browse com diversas colunas com os nomes dos fornecedores e com os respectivos preços e com os vencedores destacados. Será que os amigos podem me dar alguma luz para tal. Desde já agradeço aos amigos.. Márcio :. informaisvrb@gmail.com FWHX 2.6+ SQLLIB + xDev + rpv + MYSQL 5.0 / fwh808+sqllib(atual) Msn.: mastermarvrb@msn.com Quote Link to comment Share on other sites More sharing options...
marcio1361303176 Posted August 3, 2011 Author Report Share Posted August 3, 2011 Amigos estou migrando um cliente novo de autopeças e ele tinha um sistema em delphi, que faz a cotação de preços de varios fornecedores e varios produtos. Dai é digitado os preços de cada fornecedor. Apos isso o sistema separa os ganhadores das cotaçoes. Ele exibe um browse com os fornecedores vencedores em destaque conforme abaixo. Ele cria um browse com diversas colunas com os nomes dos fornecedores e com os respectivos preços e com os vencedores destacados. Será que os amigos podem me dar alguma luz para tal. Desde já agradeço aos amigos.. Márcio :. informaisvrb@gmail.com FWHX 2.6+ SQLLIB + xDev + rpv + MYSQL 5.0 / fwh808+sqllib(atual) Msn.: mastermarvrb@msn.com Quote Link to comment Share on other sites More sharing options...
joaosolution Posted August 4, 2011 Report Share Posted August 4, 2011 Marcio Com o xBrowse você consegue fazer isto sem problemas. Pasta samples\xBr*.prg Att João Bosco Contagem/MG FWH 10.6b xHb 1.2.1 WorkShop 4.5 PellesC SQLLIB SQLRDD Quote Link to comment Share on other sites More sharing options...
sambomb Posted August 4, 2011 Report Share Posted August 4, 2011 Onde está sua duvida? Em como calcular os vencedores ou em como destacar eles em um browse? RCA Sistemas - Itaocara - RJ Quote Link to comment Share on other sites More sharing options...
zekasan Posted August 4, 2011 Report Share Posted August 4, 2011 Eu colocaria uma variável a mais no bd, o programa verifica qual o menor valor e a marcaria como .t., depois no browse ele verifica esta variável e mudaria a cor do célula FWH 8.08 - xHarbour - xDev - VLib Quote Link to comment Share on other sites More sharing options...
Luisão Posted August 4, 2011 Report Share Posted August 4, 2011 Se a dúvida for na criação das colunas dos fornecedores dinamicamente, usando a TCBrowse eu faço assim: Usando como base sua tela, acho que seria mais ou menos assim: aProduto:= {...} // Todos seus fornecedores // A Array que vai no Browse tem 5 campos fixos + N colunas p/ // fornecedores e M linhas, uma por produto aCotacao:= ARRAY(LEN(aProduto),5+LEN(aFornece)) FOR WX = 1 TO LEN(aFornecedores) // Monta o bloco do conteúdo, depois de preencher corretamente // aCotacao, é só usar as posições corretas (aqui no caso é WX+5) cBloco:= "{|x| IF(Pcount()>0,oBRW:aArray[oBRW]:=x,; oBRW:aArray[oBRW])}" // Nome do Fornecedor no Header cHeader:= aFornecedores[WX,1] // Adiciona a coluna oBRW:Addcolumn( TCColumn():New(cHeader, &cBloco ,,,,"CENTER",62,.F.,.F.,,,,.F.)) // Define o Header oBRW:aHeaders[WX+5]:= cHeader NEXTid=code>id=code>Luis Fernando Jr. (Luisão) Leme/SP -- FWH8.01 + SQLLIB 1.9d + xHB 1.10 + xDev 0.65 + @SAY luis.fernando.majr@gmail.com juninho_luisao@hotmail.com (só msn) Skype luis.fernando.jr http://www.luisfernandojr.com Quote Link to comment Share on other sites More sharing options...
marcio1361303176 Posted August 4, 2011 Author Report Share Posted August 4, 2011 amigo sambomb preciso das duas coisas... Márcio :. informaisvrb@gmail.com FWHX 2.6+ SQLLIB + xDev + rpv + MYSQL 5.0 / fwh808+sqllib(atual) Msn.: mastermarvrb@msn.com Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.