Página 2 de 2

Re: Copy/Del/Ren c/ corringa

Enviado: 21 Nov 2008 20:32
por sygecom
Veja se os exemplos em Anexo, ajuda.

Re: Copy/Del/Ren c/ corringa

Enviado: 22 Nov 2008 09:25
por TerraSoftware
Maligno, vc tem razão, o negócio é criar uma funcao no braço mesmo, já tenho algo muito proximo do que preciso, basta agora aperfeicoar, eu perguntei se ja existia algo pronto foi mesmo para ter certeza, para nao ter que reinventar a roda, mas como nao tem, entaum maos a obra!

Anacatacombs, nao desejo usar o comando RUN, eu tambem acho que ele deve ser evitado em aplicações win32, imagine uma tela de backup bem elaborada com um visual grafico, com termometro e todas aquelas firulas e derepente uma telinha do DOS aparece (mesmo que rapidinho), vai ofuscar toda a beleza da janela.
Com relação a impbar, realmente eu tenho, embora nao seja mais em forma de lib e sim em prg, ou seja, tenho o codigo fonte dela, só que hoje tenho ela completamente desmembrada, ou seja, todas as funcoes que fazem parte desta lib (e sao varias) estaum espalhadas em diversos arquivos. Adotamos uma politica de segurança de codigo fonte aqui onde trabalho (visto que já fomos roubados por ex-funcionários), algumas funcoes importantes estaum desmembradas e espalhadas, existe até funcoes que foram incorporadas ao xharbour, visto que o mesmo permite fazer isso já que temos os binarios dele (deu um trabalho aprender isso!!!!). Resumindo, para disponibilizar a impbar teria que te mandar o xharbour junto, pois é como se a gente tivesse nosso proprio xharbour (personalizado), nosso codigo fonte nao compila em outro, ou pelo menos parte dele.
Mas posso te ajudar a obter um codigo novo similar a impbar, requer algum conhecimento em C puro, mas nada que seja muito dificil. Existe tambem outras libs para xharbour muito boas para a impressão de codigos de barra, já deu uma procurada?
De onde vc é? Já que no seu perfil nao traz sua localidade. Onde fica este "Vale dos Sonhos", rs.rs.
:xau

Re: Copy/Del/Ren c/ corringa

Enviado: 22 Nov 2008 11:14
por anacatacombs
Ixe, de C eu não entendo nada :( fica complicado.
Procurei algo a respeito, porém não encontrei muita alternativa, acho que não soube procurar direito, vou tentar fazer algo do gênero ou descompilar a lib.
Obrigada pela disposição e boa vontade de me ajudar :D

[]'s
Ana

Re: Copy/Del/Ren c/ corringa

Enviado: 22 Nov 2008 12:45
por sygecom
Se quiser dar uma olhada, no link abaixo postei uns exemplos de codigo de barra:
Exemplo Codigo de Barra

Re: Copy/Del/Ren c/ corringa

Enviado: 23 Nov 2008 16:24
por Hasse
Oi anacatacombs.

Os recursos do xHarbour não fazem aquilo que você deseja ?

Veja se no tópico abaixo tem algo que te ajude:
viewtopic.php?f=4&t=6465

Re: Copy/Del/Ren c/ corringa

Enviado: 23 Nov 2008 22:49
por anacatacombs
Olá..
Tudo no Harbour é novo pra mim, estou nessa apenas a 1 semana.
Vou estudar o tópico, e tentar entender.

Obrigada

[]'s

Ana

Re: Copy/Del/Ren c/ corringa

Enviado: 24 Nov 2008 08:53
por Hasse
Estou à tua disposição.

Tenho alguma intimidade com a classe Win32prn()

Re: Copy/Del/Ren c/ corringa

Enviado: 24 Nov 2008 10:25
por asimoes
Amigos,

Alguém já viu:

FileCopy()

Código: Selecionar todos


// The example demonstrates the two modes of FileCopy()

   PROCEDURE Main
      LOCAL cSourceFile := "LargeFile.txt"
      LOCAL cTargetFile := "NewLargeFile.txt"
      LOCAL nCounter    := 1

      CLS

      ? "Regular copy "
      ?? FileCopy( cSourceFile, cTargetFile ), "bytes"

      ? "Backup copy "
      cTargetFile := "A:\backup.001"

      ?? cTargetFile, FileCopy( cSourceFile, cTargetFile ), "bytes"

      DO WHILE FileCOpen()
         WAIT "Please insert a new diskette in drive A:"

         nCounter ++
         cTargetFile := "A:\backup." + StrZero( nCounter, 3 )
         ? cTargetFile, FileCCont( cTargetFile ), "bytes"
      ENDDO

   RETURN
RenameFile():

Código: Selecionar todos

RenameFile()
Renames a file and handles errors. 
Syntax
RenameFile( <cOldFile>, <cNewFile> ) --> nErrorCode

Arguments
<cOldFile> 
This is a character string holding the name of the file to rename. It must include path and file extension. The path can be omitted from <cOldFile> when the file resides in the current directory. 
<cNewFile> 
This is a character string with the new file name including file extension. Drive and/or path are optional. Return
The function returns zero on success or a numeric error code on failure. 

Re: Copy/Del/Ren c/ corringa

Enviado: 24 Nov 2008 10:28
por Maligno
FileCopy é uma função do XHarbour. Algum erro aí?

Re: Copy/Del/Ren c/ corringa

Enviado: 24 Nov 2008 11:29
por asimoes
Mestre Maligno,

O exemplo que postei é só para mostrar que existem as funções prontas do xh para : copiar, deletar e renomear arquivos.

FileCopy()
FileDelete()
RenameFIle()

[]´s

Re: Copy/Del/Ren c/ corringa

Enviado: 24 Nov 2008 11:30
por Maligno
Ah, sim. Desculpe. Agora entendi. :)