Ir para conteúdo
Fórum Script Brasil

Fabiano_Aprendiz

Membros
  • Total de itens

    13
  • Registro em

  • Última visita

Sobre Fabiano_Aprendiz

Fabiano_Aprendiz's Achievements

0

Reputação

  1. Caros colegas, Tenho uma aplicação(em Delphi 1) aonde exporto um relatório do QuickReport para um arquivo texto, só q esse arquivo texto fica um tanto desorganizado, ainda mas se o relatório for grande. Pergunto, tenho como organizar esse arquivo texto, ou seja, alinhar as colunas? Como? Desde já, agradeço. []'s Fabiano.
  2. Problema resolvido.....pô maior desatenção minha.....antes d começar a instalar o cara, eu tinha q copiar alguns arquivos .dcp e .bpl para o diretório do windows....... Valeu!!!
  3. Caros colegas, estou com um baita problema, precisei reinstalar o Windows na minha máquina do trabalho, com isso to tendo q reinstalar tudo...A grande maioria dos softwares da empresa são em Delphi 5, já reinstalei um monte d componentes, agora tem um q tá fogo...é o Qrdesign, estou seguindo todos os procedimentos na instalação, quando chega na parte em q abro o arquivo Dclqrd_d5.dpk e mando compilar, dá a seguinte mensagem d erro: "Internal error: U 1158". alguém já teve esse problema?? Já apaguei tudo, fiz e refiz o procedimento mas não funciona...o problema é q preciso desse cara, pois sem ele o principal software da empresa não compila....Se alguém puder me ajudar eu ficarei bastante grato. Obrigado a todos, Fabiano.
  4. Caros colegas, consegui o q queria da seguinte forma: begin Try Lista:= TStringList.Create; Lista.LoadFromFile (ExtractFileName('numeros.txt')); For C := 0 To Lista.Count -1 Do Begin vetValores[strToInt(Lista[C])] := vetValores[strToInt(Lista[C])] + 1; End; For C := 0 to Length(vetValores) -1 Do Begin ListBox1.Items.Add('Total de "' + IntToStr© + '" sorteados: ' + IntToStr(vetValores[C])); end; Finally FreeAndNil(Lista); End; end; Da forma como foi implementado, o resultado está assim: Total de 1 sorteados: 40 Total de 2 sorteados: 48 Total de 3 sorteados: 35 Agora to tentando ordenar isso por ordem decrescente, digo ordenar pelos números q sairam mais vz. Ex: Total de 13 sorteados: 70 Total de 20 sorteados: 68 Total de 48 sorteados: 67 alguém sabe como me ajudar? Agradeço a todos, Fabiano.
  5. Caros colegas, estou com a seguinte dúvida: Tenho um arquivo txt com dezenas de números e a maioria desses números se repetem por várias vz. Criei uma TStringList, agora gostaria de saber, como faço para poder contar a ocorrência de cada um dos números. Ex: o número 5 se repetiu 10 vz, o 8 repetiu 6. Agradeço a ajuda. Fabiano.
  6. Agradeço a ajuda de todos, já consegui achar uma solução e fechar a aplicação. Obrigado a todos. []'s, Fabiano.
  7. Valeu pela dica amigo, já tinha conseguido fechar com outra solução, mas agora já sei como fazer esse tipo de array. Obrigado mais uma vz pela ajuda. []'s, Fabiano.
  8. Bom dia a todos, pessoal tenho um txt com as seguintes linhas: AVG|Programa1\avg6518fu_free.exe WinRar|Programa2\WRAR300.EXE SpyBot|Programa3\spybotsd13.exe quero ler o txt e armazenar essas linhas num array, tipo: programa[1]:= aqui vai recber a 1º linha(AVG|Programa1...) programa[2]:= aqui vai recber a 2º linha(WinRar|Programa2...) usar o copy não adianta pois existe a possibilidade do txt ser alterado. alguém sabe como fazer? Aproveito para agradecer todas as outras duvidas q postei e obtive ajuda. Obrigado a todos, Fabiano.
  9. Acho q nesse caso seria melhor você usar o componente RxCalcEdit da paleta RxLib e alterar a sua propriedade DisplayFormat para R$0.00. []'s, Fabiano.
  10. O problema é q com o copy em tenho q delimitar o espaço e não quero fazer isso, pois o motivo pelo qual eu utilizo esse txt é q quando eu excluir ou incluir um novo aplicativo nele, eu não devo recompilar(alterar) o programa. Tem alguma outra ideia? Desde já , agradeço. valeu
  11. Bom dia galera, estou fazendo uma aplicação q irá realizar a instalação de outros aplicativos atraves de um arquivo texto, ou seja eu tenho q montar o formulario e exutar a instalação depois de ler o txt. O q fiz foi o seguinte: no meu txt eu coloquei o nome dos programas e os paths, as linhas ficaram assim: AVG|Programa1\avg6518fu_free.exe WinRar|Programa2\WRAR300.EXE Eu coloquei um radiogroup e seus items são incluidos na criação do formulario. Depois para instalar eu armazenos esses items em uma variavel e pego o itemindex q esta marcado para poder instalar. Bem só q para montar o formulario, eu quero pegar só até o caractere "|" e para instalar, eu quero pegar o path q está depois do caractere |. não sei como fazer isso. alguém tem alguma dica? Agradeço a todos, Fabiano.
  12. Eu preciso fazer isso a partir de um txt mesmo, desculpe é q ainda to engatinhando no delphi, teriam algum exemplo? Obrigado.
  13. Caros colegas, Preciso desenvolver uma pequena aplicação q execute a instalação de outros programas, mas isso deve ser feito a partir de um arquivo txt. Ou seja no txt eu informo o nome e o path dos programas e faço a leitura disso via codigo p/executar a instalação. Deu p/entender? O melhor é usar um array ou Tstringlist? Gostaria de algum exemplo. Obrigado a todos, Fabiano.
×
×
  • Criar Novo...