Search found 22 matches

by Luisão PITBULL
Wed Mar 12, 2014 8:59 pm
Forum: FiveWin for Harbour/xHarbour
Topic: TABS bitmap
Replies: 3
Views: 811

Re: TABS bitmap

Ukoenig,thanks for the help, worked 100% for n:=1 to len(oTabs:ahBitmaps)      if aRegiao[n,1]<>'S'         oTabs:ahBitmaps[ n ] := ""      else         oTabs:ahBitmaps[ n ] := LoadBitMap( GetResources(), "delete0" )      endif next oTabs:acBitMaps := aImagens oTabs:refresh()   M...
by Luisão PITBULL
Sat Mar 01, 2014 8:50 pm
Forum: FiveWin for Harbour/xHarbour
Topic: TABS bitmap
Replies: 3
Views: 811

TABS bitmap

I can not change the image at runtime system http://nsae01.casimages.net/img/2014/03/01/mini_140301094419512823.jpg http://www.casimages.com.br/i/140301094419512823.jpg.html REDEFINE TABS oTabs ID 161 OF oDlg1 ; PROMPT nFolder[1,2],nFolder[2,2],nFolder[3,2],nFolder[4,2],nFolder[5,2],nFolder[6,2],nFo...
by Luisão PITBULL
Sun Nov 03, 2013 6:33 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Retorno del SqlArray()
Replies: 2
Views: 559

Re: Retorno del SqlArray()

cSql="SELECT pedido,valor,date_format(data,'%d/%m/%Y')"
cSql+=" from parcela"
aSql:=SqlArray(cSql)

campo DATA
aEval( aSql, {|_1, _2| aSql[_2,3] := CTOD( aSql[_2,3] ) })


campo NUMERIC
aEval( aSql , {|_1, _2| aSql[_2,2] := VAL(aSql[_2,2]) })


Luiz Fernando
by Luisão PITBULL
Wed Sep 25, 2013 10:20 pm
Forum: FiveWin for Harbour/xHarbour
Topic: TTitle from RESOURCE a Image-problem ?
Replies: 5
Views: 1616

Re: TTitle from RESOURCE a Image-problem ?

thanks for the feedback the epoch so decided REDEFINE TITLE oTitle ID 4001 OF oBairro SHADOW NOSHADOW oTitle:lBorder:=.F. @ 10, 4 TITLETEXT OF oTitle TEXT "Manutenção Cadastro de Bairros" font Arial18B @  5,600  TITLEIMG  OF oTitle BITMAP "LOGOMINI" SIZE 60,40 ANIMA LEVEL 220   w...
by Luisão PITBULL
Thu Aug 08, 2013 11:09 pm
Forum: FiveWin for Harbour/xHarbour
Topic: xbrowse
Replies: 6
Views: 1188

Re: xbrowse

nageswaragunupudi, thanks for the feedback


Francisco, had ignored his response and test done only with the command oBrw: GoRight () now worked 100% thank you



Luiz Fernando
by Luisão PITBULL
Mon Aug 05, 2013 4:12 pm
Forum: FiveWin for Harbour/xHarbour
Topic: xbrowse
Replies: 6
Views: 1188

Re: xbrowse

Colleague thanks for the reply


with his example he goes straight for the end.


Image

could not skip the middle image


thank you

Luiz Fernando
by Luisão PITBULL
Wed Jul 31, 2013 11:23 pm
Forum: FiveWin for Harbour/xHarbour
Topic: xbrowse
Replies: 6
Views: 1188

xbrowse

colleagues there any command to display columns that are not visible without having to use the right arrow


thank you

Luiz Fernando
by Luisão PITBULL
Wed Feb 27, 2013 8:07 pm
Forum: All products support
Topic: forum fivewin.com.br
Replies: 10
Views: 11152

Re: forum fivewin.com.br

Consegui uma resposta da Cheila, segue: Boa tarde Rogério, o nosso site foi atacado por hacker e estamos fazendo de tudo para poder ativá-lo. Espero que dentro de uma semana no mais tardar já esteja tudo ok. Atenciosamente Cheila Tavares Virtual Object Informática Ltda 15 3231-6840 Maravilha, vamos...
by Luisão PITBULL
Wed Feb 27, 2013 5:28 pm
Forum: All products support
Topic: forum fivewin.com.br
Replies: 10
Views: 11152

Re: forum fivewin.com.br

Já falei com varios, realmente ninguém sabe se o Gilmer vai colocar no ar de novo, o que é uma pena, uma pelo acervo de informações que tem la, e pelos amigo, que alguns o unico contato era por la, caso ele não entra no ar podemos utilizar este forum aqui mesmo, ou até criar um outro aonde um colega...
by Luisão PITBULL
Wed Feb 27, 2013 5:21 pm
Forum: All products support
Topic: Imprimir Documento PDF
Replies: 4
Views: 2480

Re: Imprimir Documento PDF

Bom Dia Luiz Fernando, Quando voce informar o nome do arquivo para abrir coloque um espaço e /p seu programa .... cRun_Pdf := "relato.pdf /p" executa_pdf() ..... return nil Function executa_pdf()    //? cRun_Pdf    If file(cRun_Pdf)       Shellexecute(,"open",cRun_Pdf)       She...
by Luisão PITBULL
Tue Feb 26, 2013 9:05 pm
Forum: All products support
Topic: Imprimir Documento PDF
Replies: 4
Views: 2480

Re: Imprimir Documento PDF

Sistem wrote:WinExec(seuArqPDF..) vai abrir o PDF com o programa de PDF padrao
ShellExecute tambem abre
Colega obrigado pela resposta, o que precisava seria imprimir o PDF direto, sem abrir o visualizador de PDF, mais acho que nao tem como....



Luiz Fernando
by Luisão PITBULL
Tue Feb 26, 2013 12:50 pm
Forum: All products support
Topic: Imprimir Documento PDF
Replies: 4
Views: 2480

Imprimir Documento PDF

Colegas alguém saberia me dizer como faço para imprimir um arquivo PDF direto de dentro do sistema, tipo tenho o PDF na maquina queria imprimir este arquivo de dentro do sistema.




Obrigado


Luiz Fernando


fwh1104
by Luisão PITBULL
Mon Feb 04, 2013 11:15 pm
Forum: FiveWin for Harbour/xHarbour
Topic: image\GroupHeader
Replies: 2
Views: 550

Re: image\GroupHeader

If you want to change the bitmap of the Group Header, then change the nGrpBmpNo of the first column in the Group Once marked, but does not clear, there is no way to change the image in termpo execution http://img831.imageshack.us/img831/9178/tela1p.jpg     for i:=2 to (len(aCliente)*2)+1       Defi...
by Luisão PITBULL
Fri Feb 01, 2013 1:48 pm
Forum: FiveWin for Harbour/xHarbour
Topic: image\GroupHeader
Replies: 2
Views: 550

image\GroupHeader

Guys, someone would have any tips on how to change the image in GroupHeader at runtime I tried to use this example of samples oBrw:aCols[i]:bLClickHeader := { | nMRow, nMCol, nFlags, Self | If( ::nHeadBmpNo == 2, ::nHeadBmpNo := 1, ::nHeadBmpNo := 2 ), ::oBrw:Refresh() } replacing nHead by n nGrp no...
by Luisão PITBULL
Thu Jan 31, 2013 5:57 pm
Forum: FiveWin for Harbour/xHarbour
Topic: xbrowse\Header
Replies: 2
Views: 621

Re: xbrowse\Header

Fourth parameter is the column object. oCol:nCreationOrder gives the serial number of the column while creating the browse. While programming with xbrowse it is normally advisable to use the column objects instead of numbers. thanks for the reply form below worked oBrw:aCols[i]:bLClickHeader := {|r...