[Componentes VCL no Windows 7]

Boa noite,

Tenho um sistema pronto em delphi 7 acessando banco de dados postgres. Este sistema foi desenvolvido em um sistema operacional Windows XP e com componentes VCL.

Agora que entra o problema.

Instalei o delphi 7 como o mesmo banco de dados e componentes no Windows 7 64bits. Até ai tudo beleza.

Mais quando eu mando compilar o projeto, me retorna vários erros de Duplicate resource.

Reparei que a maioria dos erros se referem aos forms que utiliza o componente DBGrid.

Pesquisando na internet descobri que eu teria que utilizar componentes CLX ao invés de VCL.

Tem alguma maneira de reverter este problema sem ter que alterar o código fonte????

Ou se tiverem uma sugestão!

Obrigado

[ARWordReport]

Boa tarde.

Alguém por acaso conhece o componente ARWordReport que pode me dar uma luz ou me arrumar um tutorial.

Abradecido

[(Resolvido) Word com Delphi 7 - Como pular a página]

Boa tarde pessoal,

Após várias pesquisas na internet consegui achar o q eu estava precisando.

Segue o código para pular para a próxima página do word utilizando o delhpi

Word.Selection.EndKey(wdStory); //move o cursor para a última posição do documetno

Word.Activedocument.Range(Word.Selection.Start,Word.Selection.Start).InsertBreak(); //insere uma quebra de página

Word.Selection.EndKey(wdStory); //move o cursor para a última posição do documento

Word.Selection.EndKey; //move o cursor para o final do arquivo

e no uses adiciona word2000;

Obrigado

[(Resolvido) Word com Delphi 7 - Como pular a página]

Bom dia Jhonas....

O relatório que estou desenvolvendo é direto, não utilizo nem quickreport, nem fortesreport e nem outro.

Utilizo uma variavel do tipo variant >> Word : Variant;

E vou montando esta varial

ex:

Word := CreateOleObject('Word.Application');

try

Word.Documents.Add('Modelo.dot');

prgrsbrGeracaoRelatorio.Max := 100;

prgrsbrGeracaoRelatorio.StepBy(10);

Word.Selection.Font.Size := 18;

Word.Selection.Font.Bold := True;

Word.Selection.ParagraphFormat.Alignment := 1;

Word.Selection.TypeText(Text:='ANEXO I'+Chr(13)+Chr(13));

Entendeu?

Os relatórios já estão prontos e funcionando muito bem, só estou precisando mandar uma parte do relatório para a outra página, tipo uma quebra de página. Voce pode me ajudar??

Abraço

[(Resolvido) Word com Delphi 7 - Como pular a página]

Boa tarde

Estou desenvolvendo um aplicativo onde os relatorios são enviados para o word.

Ate ai tudo bem. Mas chegou um momento crítico. estou precisando continuar o relatório na outra página e não sei como fazer.

Exemplo:

Indice na primeira página;

Introdução na segunda página ;

Estou utilizando delphi 7 e montando o relatorio com a varialvel

Word : Variant;

esta tudo certo, só não estou conseguindo mudar a página....

alguém pode ajudar??????

Antes de mais nada obrigado

[Gostaria de uma Opinão]

bom o XP Manifest creio eu que seja para deixar os botoes no estilo do Win Xp..

Olá C.J.

Então. Se o XPManifest faz com que os botões fiquem no estilo do Win Xp, qual componente deixa o panel,edit,label,form etc no mesmo estilo (caso houver) se não houver este componente, qual sugestão voce me daria para mudar o visual do sistema sem deixa-lo pesado.

Obrigado pela ajuda

[Gostaria de uma Opinão]

Boa tarde,

Gostaria de saber como faço para melhorar o visual do meu sistema.

Estava utilizando o VCLSkin, mas testando em máquinas de clientes, percebi que o sistema ficou muito pesado. Fora alguns bugs de menu.

Então pesquisando na Internet descobri um componente do proprio delphi, XPManifest, mas não consegui melhorar as opções de cores.

Então gostaria da opinião de voces, qual a melhor forma para mudar o visual do sistema. Cor para forms e botoes... etc.

Ajudemmmmmm

Obrigado

[(Resolvido) Bat com delphi]

Ola pessoal,

Gostaria de saber como faço para charmar um sistema um arquivo bat, sendo que neste bat teria que passar alguns paramentros.Como faço com os paramentros no projeto do delphi?

Por exemplo:

---> cd C:\Arquivos de Programas\PostgreSQL\8.1\bin psql -h localhost -p 5432 -U postgres -d banco -f "C:\script.sql"

Aqui estou chamando um sistema "psql" (do banco de dados postgres) e passando parametros como host,usuario,nome do banco e caminho do arquivo.***** Isso foi um exemplo.

No meu caso preciso passar somente o nome do arquivo. Como declaro no meu projeto em delphi7

Obrigado pela atenção

ahh ta entendi

mas você que não explicou direito então, repara que você fala de "arquivo bat" e "como você faria com os parâmetros no seu projeto delphi"

da impressão que você quis saber como chamar um arquivo bat e saber como passar os parametros pra ele :)

No source do programa, menu "Project > View Source" voce adiciona

var
  szParams: String = '';

procedure GetParams;
var
  i: Integer;
begin
  for i := 1 to ParamCount do
  if (i = 1) then szParams := ParamStr(i) else
  szParams := szParams + ' ' + ParamStr(i);
end;

logo após o begin você chama o GetParams; e depois em szParams está os parametros passados ao programa...

begin
  GetParams;

  if Pos('bla', lowercase(szParams)) > 0 then
  bla;

adapte da forma que desejar...

seria isso?

Olá Churc...

Cara era isso mesmo que eu estava querendo.

Valeu pela ajuda...

[(Resolvido) Bat com delphi]

Caro Churc,

Acho q voce não entendeu minha pergunta.

Este código que você postou, eu já conhecia.

Eu queria saber como eu faria meus parametros para receber as informações vindas de parametros fora do sistema.

Segue como exemplo o do postgres que o psql recebe o nome do banco, caminho, senha e etc de um arquivo bat

cd C:\PASTA_DO_MEU_SISTEMA\src meu_sistema.exe -NOME_DO_PARAMETRO_DENTRO_DO_MEU_SISTEMA "c:\teste.txt"

Isso que eu quero saber .

Mesmo assim obrigado

[(Resolvido) Bat com delphi]

Ola pessoal,

 

Gostaria de saber como faço para charmar um sistema um arquivo bat, sendo que neste bat teria que passar alguns paramentros.Como faço com os paramentros no projeto do delphi?

 

Por exemplo:

 

---> cd C:\Arquivos de Programas\PostgreSQL\8.1\bin psql -h localhost -p 5432 -U postgres -d banco -f "C:\script.sql"

 

Aqui estou chamando um sistema "psql" (do banco de dados postgres) e passando parametros como host,usuario,nome do banco e caminho do arquivo.***** Isso foi um exemplo.

 

No meu caso preciso passar somente o nome do arquivo. Como declaro no meu projeto em delphi7

 

Obrigado pela atenção

 

 

[PNGDelphi]

Jhonas,

Muito obrigado....

Mais uma dúvida.

O arquivo que fez o download foi o pngimage.zip, é este mesmo

Se for deu certo...

Vlw

[PNGDelphi]

Ola pessoal,

Teria como alguém me ajudar?

Estou precisando do componente pngdelphi. Entrei no site mais ele não esta mais disponível.

O site q entrei foi : https://sourceforge.net/users/pngdelphi/

Se alguém tiver este componente poderia me passar? Estou usando Delphi 7

Meu email é samuelsjn@yahoo.com.br ou me passem um link para download

Obrigado

[Ajuda no Rave Report]

Bom dia!!!

Estou com uma dúvida em relação ao componente DataMemo do rave report 5.0.

Estou utilizando o Rave Disigner.

Eu gostaria de deixar o tamanho dele dinamico. O tamanho dele ira variar em relação as informações contidas no banco de dados.

O meu relatorio já esta rodando, só esta faltando arrumar esta parte, pois esta muito esquisito.

Exemplo: O campo da tabela item possui a coluna descrição

o primeiro item possui uma descrição com 100 caracters e o segundo item possui uma descrição com 10 caracteres.

Eu queria que o DataMemo aumentasse e diminuisse de tamanho em relação a descrição do item....

alguém pode me ajudar!!!!

Obrigado

[Controlar barra de rolagem em um listview]

Caro amigo Luis Ricardo;

Valeu pela explicação, mais não era essa a minha dúvuda.

Eu estava querendo que o scroll fosse para o final da minha listview, quando achasse o valor consultado.

Mais eu consegui resolver.

Essa foi o meio que desloquei a minha barra de rolagem:

ListView1.Scroll(0,ListView1.Selected.Top-(ListView1.Height div 2));

Valeu

[Controlar barra de rolagem em um listview]

Ola pessoal,

Tenho um listview no meu formulário, ele forma a lista dos meus registros que se encontram em meu banco de dados.

Nele eu faço uma consulta, mais não consigo abaixar a barra de rolagem vertical para mostrar a linha com o registro para o meu usuário

Teria como fazer isso?

Abraço

[Otimizar consulta com ADO]

Boa tarde

Gostaria de saber se existe algum modo de melhorar a velocidade da consulta no postgresql.

Estou desenvolvendo um sistema utilizando Delphi 7 com o postgres 8.1, a conexão eu utilizo ADO com ODBC.

Quando faço uma consulta simples ( Select idfornecedor, nome, cnjp from fornecedor ) no pgAdmin III, o resultado volta muito rápido.

Mas, quando faço no delphi (meu sistema) demora um pouco para preencher a listveiw.

São mais ou menos 3900 registro que volta nesta consulta.

alguém poderia me ajudar

Antes de mais nada Obrigado

[Rave Report]

Estou precisando justificar um texto no memo do Rave Report. Alguém sabe como faço isso?

Faça uma pesquisa no forum, já tem alguma coisa a respeito.

http://scriptbrasil.com.br/forum/index.php...lite=justificar

abraço

Ola Jhonas,

Cara eu já tinha pesquisado no Forum, dei mais uma olhado hoje com esse seu link, mais não resolveu o meu problema.

Tem neste Forum, uma function JustificarText, eu testei ela aqui mais tambem não resolveu o meu problema.

(Só para reforçar) " O meu problema é justificar um memo estático no Rave Report Design. "

Valeu Jhonas obrigado pela ajuda

[Saldo no Rave Report]

Ola Jhonas,

Os meus DataBand estão configurados da maneira que você falou.

Eu só não entendi a parte de definir os campos. Em qual propriedade eu defino? É no DetailKey?

O meu DataBand que esta como o BandStyle definido como Detail o qual mostra a quantidade, esta com o DataView apontando para o DataView2, sendo que o CalcOp esta utilizando o DataView2 e DataView3, será que isto esta interferindo?

Obrigado pela ajuda

[Saldo no Rave Report]

Pessoal boa tarde,

Estou desenvolvendo relatórios no rave report utilizando banco de dados Postgres e Delphi 7.

A minha dúvida é a seguinte.

Tenho que exibir o saldo da quantidade de item.

Tenho uma tabela de estoque que possui tanto a entrada e saída dos itens.

Faço uma consulta por item, outra somando a quantidade de entrada e outra consulta somando a quantidade de saída.

Mando estas três consultas para o rave.

Em um DataBand coloco a descrição e o código do item.

Em outro DataBand utilizo o componente CalcOp para fazer a subtração da qauntidade dos itens.

Src1DataField >> entrada

Src1DataView >> DataView2

Src2DataField >> saida

Src2DataView >> DataView3

Assim esta o meu CalcOp.

o calculo esta correto; o problema que estou tendo e que um item esta recebendo todas as quantidades e esta repetindo para os outros itens.

EX:

Cod: 292

Desc: Caneta

Quantidade: 5

Quantidade: 25

Quantidade: 80

Quantidade: 99

- - - - - - - - - - - - - - - -

Cod: 293

Desc: Caneta Preta

Quantidade: 5

Quantidade: 25

Quantidade: 80

Quantidade: 99

- - - - - - - - - - - - - - -

Cod: 294

Desc: Caneta Vermelha

Quantidade: 5

Quantidade: 25

Quantidade: 80

Quantidade: 99

- - - - - - - - - - - - - - -

Cod: 295

Desc: Lapis

Quantidade: 5

Quantidade: 25

Quantidade: 80

Quantidade: 99

- - - - - - - - - - - - - - -

Eu gostaria que ficasse assim,

Cod: 292

Desc: Caneta

Quantidade: 5

- - - - - - - - - - - - - - - -

Cod: 293

Desc: Caneta Preta

Quantidade: 25

- - - - - - - - - - - - - - -

Cod: 294

Desc: Caneta Vermelha

Quantidade: 80

- - - - - - - - - - - - - - -

Cod: 295

Desc: Lapis

Quantidade: 99

- - - - - - - - - - - - - - -

Em que parte estou errando?

alguém poderia me ajudar?

Obrigado

[(Resolvido) Formatar valor no Rave Report]

Ola pessoal,

Estou usando Delphi 7 e Rave Report.

Estou consultando o banco de dados no Delphi e enviando para o Rave.

Nesta consulta possui um campo (valor) que é um float. Como consigo formatar este valor no Rave Report?

Estou precisandfo que apareça assim 0.000,00.

alguém tem alguma sugestão?

Valeu...

Olá pessoal,

A pedido do Micheus irei colocar a melhor maneira (pode ter outrar mais essa foi a minha escolhida) de formatar um valor flat no Rave Report.

Estou utilizando o banco de dados Postgres e Delphi 7, neste delphi se encontra o Rave 5, o qual estou utilizando.

Na arvore de componentes do Rave, possui uma opção de Data View Dictionary (Dicionário de dados), é nele que estão todos os atributos compostos da sua pesquisa de sql, repare que o ícone referente ao atributo mostra que tipo de dados foi recuperado pela consulta.

Selecione o atributo com o tipo de dado "igual" a float e na aba de propriedades deste atributo irá possuir a opção DisplayFormat.

Nesta opção coloque a máscara #,##0.00 (somente isto). Pronto o formato do float ira possuir duas casas decimais.

Abraço

[Senha no postges]

Quando voce sugere a linha de comando, voce diz do bash ou do psql do próprio PostgreSQL?

Por ambas tem como alterar a senha, de n maneiras

Sendo que se já está logado no psql fica bem mais fácil.

Ola Kandrade,

Para mim tanto faz, estou precisando uma maneira de encontrar a senha atraves de comandos que irei inserir no meu projeto em Delphi....

Obrigado pela atenção

[Senha no postges]

Olá Pessoal,

Tirem uma dúvida. Tem como através de linha de comando descobrir a senha do meu banco (ou usuario) no postgres.

Pois estou precisando deixar alterar a senha do banco, mais so se souber a atual senha. Por isso queria comparar.

Obrigado

[(Resolvido) Formatar valor no Rave Report]

Pessoal muito obrigado, mais consegui resolver....

[Preencher uma lista em tempo de execução]

Ola pessoal;

Estou precisando criar uma lista (tipo excel) com linhas e colunas. A primeira coluna será a descrição do item, e as demais colunas serão os lances de cada fornecedor.

Estava pensando em fazer com o listview, mais eu não sei se este componente possui esta função. Inserir diretamente nas suas células os valores do usuário (descrção do item e lance dos fornecedores).

alguém poderia me ajudar?

Caso o delphi 7 possuir outro componente teria como mandar um tutorial de como funciona.

Muito obrigado.......

[(Resolvido) Problemas Com Listview]

Muito obrigado Micheus.

Funcionou certinho e desculpe pela demora.

Abraço