Jump to content
Fivewin Brasil

helio1361303486

Membros
  • Posts

    408
  • Joined

  • Last visited

Posts posted by helio1361303486

  1. Realmente fica mais fácil desenhar no Corel para quem sabe mexer nele, pois fazer o desenho direto pelo Printer é roça.

    Não entendo nada de Corel Draw, será que tem um jeito fácil de fazer esses desenhos? com algo já pronto para iniciante?

    Ou outro Software mais fácil de usar.

    Aí é como vc disse, transportar para o Preview.

    Abraço,

    Hélio.

    xHarbour/WS/PellesC

  2. Luiz,

    já tentei colocar como vc disse e nada:

    QUE ESTRANHO NÉ?

    REDEFINE CHECKBOX oChk VAR vChk ID 110 OF oFld:aDialogs[1] COLOR NRGB(255, 192, 203), RGB(255, 192, 203)

    Não faz efeito nenhum e continua com a letra preta.

    Grato à todos,

    Hélio

    xHarbour/WS/PellesC

  3. Oliveira,

    uso com ID.

    REDEFINE CHECKBOX ochk VAR vChk ID 110 OF oFld:aDialogs[1]

    Já tentei colocar assim:

    REDEFINE CHECKBOX ochk VAR vChk ID 110 OF oFld:aDialogs[1] COLOR CLR_RED,CLR_BLUR

    Já tentei colocar assim:

    oChk:SetColor(CLR_RED)

    Mas sem resultado,

    Hélio

    xHarbour/WS/PellesC

  4. Caros,

    Adicionei uns mp3 no Pelles C ele aceita e até executa nele. mas quando vai compilar dá erro dizendo que tem que ser 32 bits.

    Alguém já adicionou MP3,WAV no .RES do pelles C ?

    Hélio

    xHarbour/WS/PellesC

  5. Caros,

    Adicionei uns mp3 no Pelles C ele aceita e até executa nele. mas quando vai compilar dá erro dizendo que tem que ser 32 bits.

    Alguém já adicionou MP3,WAV no .RES do pelles C ?

    Hélio

    xHarbour/WS/PellesC

  6. Gilberto,

    Kapiaba tem razão, tive vários problemas desse tipo e um que me lembro é na abertura de arquivos que não havia motivo para ter erros. Foi então que depurei o código colocando à cada linha o MsgAlert("estou aqui-1") ...

    e com isso o erro não me apresentava.

    Então coloquei antes da linha que dava ação um MsgWait(.01) que não influencia na velocidade do sistema, e elimina esse erro.

    Espero ter ajudado.

    Hélio.

  7. Ricardo,

    Obrigado por pre dispor a ajudar.

    Fiz o que indicou, mas mesmo ao abrir as imagens no próprio Paint Brush ela já se mostra com distorção com pedaços pretos no fundo. E na visualização do explorer do windows ela é perfeita.

    Mesmo assim, salvei com outro nome e no formato .png e abri com o Image, e apareceu idêntico ao Paint Brush.

    fiz esse teste com mais de 5 imagens Png e deu a mesma coisa

    será que os pngs que tenho estão com algo mais?

    Se vc puder me enviar a imagem que deu certo aí. e eu te mando a que deu errado aqui, poderiamos ver o que esta acontecendo.

    segue meu endereço:

    helioaraujosantos@hotmail.com

    Hélio

  8. Pessoal,

    Ainda não existe uma forma de utilizar ícones .PNG no FWH ?

    O pessoal do Coral conseguiu e a lib é para fwh, será que não tem jeito de montar uma classe para poder inserir nas dialogs e na oBar ?

    os PNGs é show de qualidade

    Hélio

    xHarbour/WS/PellesC

  9. Pessoal,

    Ainda não existe uma forma de utilizar ícones .PNG no FWH ?

    O pessoal do Coral conseguiu e a lib é para fwh, será que não tem jeito de montar uma classe para poder inserir nas dialogs e na oBar ?

    os PNGs é show de qualidade

    Hélio

    xHarbour/WS/PellesC

  10. Será que esta rotina é segura para .DBF ? não podendo dar erros no arquivos depois ?

    function prot (nome_do_Arquivo)

    parameters FILE

    private READ_BYTES

    private WRITE_BYTES

    private HANDLE

    private BUFFER

    HANDLE := fopen(FILE,2)

    if HANDLE = - 1

    return (.F.)

    endif

    BUFFER := space(01)

    READ_BYTES := fread(HANDLE,@BUFFER,1)

    if READ_BYTES != 1

    return (.F.)

    endif

    BUFFER := iif(asc(BUFFER) = 3,chr(4),iif(asc(BUFFER) = 4,chr(3),BUFFER))

    BUFFER := iif(asc(BUFFER) = 131,chr(132),iif(asc(BUFFER) = 131,chr(132),BUFFER))

    fseek(HANDLE,0,0)

    WRITE_BYTES := fwrite(HANDLE,BUFFER,1)

    if WRITE_BYTES != 1

    return (.F.)

    endif

    fclose(HANDLE)

    return (.T.)

  11. iniciei uns testes à 1 ano. Depois parei por falta de tempo.

    Penei pra fazer funcionar, pois só tenho o xharbour free, pois ainda programo em clipper53b, e cada alteração no teste, tinha que passar para alguém compilar pra ver o resultado no fivewin.

    mas o TREM, inclui, altera, exclui, pesquisa, e tem até um browse que montei para navegação mais rapidinha. rs.

    Tenho um banco de dados de teste.

    Queria primeiro, saber se tem alguém com disponibilidade

    de fornecer um servidor para MySQL, passando o usuário e senha para o teste rodar, aí faço os testes finais e disponibilizo aqui para todos.

    Hélio

    xharbour/WS/PellesC

×
×
  • Create New...