ED - Claret

FIZ O QUE ME DISSE MAS NÃO RESOLVEU Esta dando a entender que o CRViewer1 esta aberto e não pode ser redesenhado, entendeu? Achei uma opção de fechamento só que não sei como usa-lo, veja abaixo... CRViewer1.CloseView () ' aqui ele pede um índece, mas não sei qual é, já tentei varios numeros e nada, o problema continua. Fiz o mesmo teste usando a ocx do Crystal 4.6 e funcionou uma beleza, então o problema pode ser resolvido mesmo em algum evento de fechamento. Muito obrigado pela ajuda...abraços....

Valeu Graymalkin você matou a pau Muito obrigado a você também Kuroi Desenvolvedores como vocês é que fazem a diferença nesse Fórum Abraços....

Usando só o ListIndex eu capturo somente o Index: 0, 1, 2, 3.... Preciso capturar o valor que está no Combo, por exemplo: Combo1.AddNew Antonio Combo1.AddNew José Combo1.AddNew Silva ... Se eu clicar no nome José e logo em seguida clicar num botão, eu preciso ser informado que chamei o nome José............não posso usar o text do combo. Se Cliquei em José......... Combo1.ListIndex = 1 Se ListIndex é = a 1 então que chame o valor que é José, entendeu? Ou eu compliquei mais ainda as coisas.

Como faço para capturar qualquer valor de um Combo Box? Não quero usar o Text, tipo assim: Label1.Caption = Combo1.Text Preciso usar seu index... Tentei isso: Label1.Caption = Combo1.ItemData(Combo1.ListIndex) Mas o valor só retorna a "0" e não ao ítem que peguei no Clik Qualquer ajuda será bem vinda...muito obrigado

Sim, eu fiz o que me disse, inclusive inserindo uma nova linha, mas a safada continua por baixo Tentei de tudo, cara....

Acho que me confundi na questão.... São as linhas que insiro que não ficam por cima da figura... sempre ficam por baixo dela

Esse Crystal é uma porcaria.... Tenho uma figura(marca dágua) no plano de fundo na seção Page Reader Tenho sobre ela vários label´s, mas acontece que as linhas que inseri não ficam por cima dessa figura. Já tentei de tudo, enviar para cima, para baixo, pro inferno e nada.... a figura sempre fica por cima dessas linhas. alguém tem uma dica aí? Muito obrigado por qualquer ajuda

Tenho um Label com borda. Tem como mudar a espeçura dela? Preciso afinar mais essa borda, mas não estou encontradno opção para isso Muito obrigado por qualquer ajuda

Não consigo encontrar esse arquivo ( P2smon.dll ), onde pego ele?

Instalei meu programa em outra maquina para testes preliminares. Não funciona meu relatorio de impresão, quando vou abri-lo da erro 429 active x Trabalho com o crystal 11 estão instalados os dois componentes que uso:> Craxdrt.dll e Crviewer.dll O que está faltando mais???? socoooroooooooo Alias tentei registrar eles manualmente mas não consegui da erro de registro. Me ajudem, por favor....muito obrigado....abraços...

Olá amigos.... Estou trabalhando com o Crystal XI. Onde é que esta o Same As Report? Toda vez que mudo de diretorio dá pau e tenho que renomiar o caminho do BD. Obrigado por qualquer ajuda...abraços...

Underlay poderá também ser utilizado da seguinte forma... Crie uma SubSeção e nela coloque uma image, vincule as duas com o Underlay... Pronto! você tem aí no seu rela´torio uma figura de fundo podedndo ser utilizada como marca d´agua, etc.... etc...

tentei referenciar pelo HostName assim: "MEHOST://11.111.1.11/SistemaCorporativos/BD.mdb" ...mas também da erro "caminho inválido"

Olá amigos.... Estou em apuros; não consigo acessar um BD que esta num servidor em outra cidade. Minha empresa tem uma navegação privada pela INTRANET. Dim Conexao As ADODB.Connection Dim Tabela As ADODB.Recordset Dim LOCALDOBANCO As String LOCALDOBANCO = App.Path & "\BD.mdb" Set Conexao = New ADODB.Connection Set Tabela = New ADODB.Recordset Conexao.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & LOCALDOBANCO & ";Persist Security Info=False" Tabela.Open "SELECT * FROM Base", Conexao, adOpenKeyset, adLockOptimistic Tabela("Fator") = "Valores" Tabela.Update ....até aqui tudo bem, mas preciso que a String LOCALDOBANCO seja "http://11.111.1.11/SistemaCorporativos/BD.mdb" á erro de arquivo não encontrado, alguém pode me ajudar??? Muito obrigado...abraços...

Conseguimooooooooooossssssssssssssssssss........... Então vamos lá... Crie um Relatório com multiplas colunas Em um outro - este será o relatório Principal. Insira nele o relatorio criado anteriormente. Coloca ess SubReport´s na Sessão Details. Formate essa seção..na guia common: marque as caixas: Free.. Keep... Underlay... Na sessão Page Reader coloque os labels em uma ou duas colunas e utilize quantas linhas quizer Formate ela marcando as caixas: Free... Underlay... Quando voce marca as caixas Underlay... voce junta as duas seções. Então configure o layoult da forma que quizer, ou seja, os labels e o subreports. Exemplo: (Na Page Reader) |ColunaDosLabels| (Na Seção Details) SubReports| (Visualizando...Prevew) ColunaDosLabels|SubReports| ESPERO TER CONTRIBUÍDO A ALTURA DESSE CONCEITUADO FÓRUM. Coloquem isso em Dicas, pois a mais de um ano que procuro por essa solução e acabei descobrindo hoje, casoalmente....... Penso que muitos poucos sabem disso e eles não repassam - o que é uma pena. Penei mas valeu galera.. Abraços a todos - A propósito.... veja se me ajudem no post "REDE REMOTA"

beleza........ Mas tem um pequeno probleminha A´pos instalado o sistema: Quando vou imprimir da erro no Crystal(uso o XI) ERRO 429 Active x Business Objects\3.0\bin\ParameterDesigner.dl não pode ser registrado ou algo parecido A linha no ISTool é essa... Source: ParameterDesigner.dll; DestDir: {cf}\Business Objects\3.0\bin; Flags: promptifolder regserver sharedfile ... mas tem mais erros e na sua maioria é com relação ao crystal. Pode me dar alguma dica na instalação dos arquivos dependentes do Crystal?? Muito obrigado por qualquer ajuda...abraços...

Reinterando... Tem Ocx´s que dão erro de versões, como é o caso da TABCTL32.OCX. Outras OCX´s não são capturadas pelo ISTool Meu projeto foi desenvolvido na plataforma xp e estou intalando em maquinas com o Win98, mas antes essas coisas não aconteciam com o vb5. estou ficando meio doido com essas porqueras

Estou migrando para o Inno e ISTool. Acontece o seguinte... Após ter gerado o Setup e instalado em outra máquina o meu sistema... Quando tento abrir esse sistema da erros em algumas dll´s; FALTA DE REGISTROS. Como é que eu faço para que tudo de certo na instalação sem ter que registrar todas essas porcarias na unha. Quando usava o vb5 e o Wisard era uma maravilha - da vontade de voltar atraz... Muito obrigado por qualquer ajuda, principalmente no manuseio desses dois aplicativos, algumas dicas serão muito úteis.

Key ASCII ou Code, ambos são nº 9

É preciso utilizar subreports, pois necessito que os dados dos campos sejam em multiplas colunas. Não seria necessário subreports se o Crystal desse condição de afastamento da coluna da esquerda para a direita, isto é, precisaria de espaço a direita para colocar os Labels e na sequencia as colunas dos campos, entendeu. Então penso que o subreports seja necessário. Os labels das linhas poderão ser de comprimento fixo, pelo menos por enquanto até resolvermos essa parada. Suponho que terei 30 linhas no máximo, porém o número de colunas é desconhecido, o que poderá gerar várias páginas. Se tiver que colocar uma condição na mudança de cada página estou fú. A propósito, os Labels sempre serão os mesmos nas mudanças de página. Estou tentando por aqui, se tiver + idéias me avise; faremos junto essa porcaria, quem achar a solução que passe pro outro então, certo??? Abração amigo....

Já encontrei o erro, estava no nome Conexão, passei para Conexao sem o ascento... Muito obrigado pela ajuda, amigo

beleza, AS COISAS AGORA ESTÃO FUNCIONANDO, PORÉM NÃO LOCALIZEI NADA NESSE FORUM SOBRE REDE REMOTA... Dim LOCALDOBANCO As String LOCALDOBANCO = "http://11.111.1.11/SistemaCorporativos/BD.mdb" Conexão.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & LOCALDOBANCO & ";Persist Security Info=False" ...DÁ ERRO DE NOME DE ARQUIVO INVÁLIDO

Já fiz as correções, só que agora da erro na linha em vermelho Dim Conexão As ADODB.Connection Dim Tabela As ADODB.Recordset Dim LOCALDOBANCO As String LOCALDOBANCO = App.Path & "\BD.mdb" Set Conexão = New ADODB.Connection Set Tabela = New ADODB.Recordset Conexão.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & LOCALDOBANCO & ";Persist Security Info=False" Tabela.Open "SELECT * FROM Base", Conexao, adOpenKeyset, adLockOptimistic Tabela("Fator") = "Text" Tabela.Update É erro "3001 - Os argumentos são incorretos, estão fora do intervalo aceitável ou estão em conflito."

Olá amigos, estou fazendo isso... Dim Conexão As ADODB.Connection Dim Tabela As ADODB.Recordset Dim LOCALDOBANCO As String LOCALDOBANCO = App.Path & "BD.mdb" Conexão.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & LOCALDOBANCO & ";Persist Security Info=False" Tabela("Fator") = "Text" Tabela.Update Só que da erro na linha da conexão - Variavel de bloco não definida - erro 91 Onde estou errando??? Fiz referencia ao DAO 3.51 e tambem ao "Microsoft ActiveX Data Objects 2.8 Library" Não funcionaaa

--->>>não resolveria se você fizesse um outro subreport para aquela coluna da esquerda? Já tentei isso mas não funciona --->>> me responda uma coisa, como você associa o subreport ao registro atual? Não preciso associar, pois ambos utilizam a mesma consulta --->>>outra coisa, você poe o campo numero no page header, o q aconteceria se tivesse mais de um numero na mesma pagina? apareceria so o primeiro? O relatório gerado não trabalha agrupado, ele é filtrado na consulta como disse acima e esta amarrado nesse número. No exemplo que te passei, eu quase consegui, mas quando tem mais de uma página os Labels desaparecem, já tentei solucionar isso usando a Section Expert "n" vezes diferenciadas, mas nada, quando salta de página os labels não aparecem, só aparecem na 1ª.