dorneles Posted January 31, 2008 Report Share Posted January 31, 2008 Очень хорошо, довольны. How to degrade the report is a white line and another color. FW 2.6 + HB 0.9950 + Pelles + Clipper 5.3 + VLib + xDevStudio Quote Link to comment Share on other sites More sharing options...
Spirin Sergey Posted January 31, 2008 Author Report Share Posted January 31, 2008 citação:Очень хорошо, довольны. id=quote>id=quote>Hurrah!!! Do not forget about 1,2 - variants. citação:How to degrade the report is a white line and another color. id=quote>id=quote>What-what? It's not understandable. Quote Link to comment Share on other sites More sharing options...
evandro Posted January 31, 2008 Report Share Posted January 31, 2008 Olá, Suponho que ele queira uma linha com fundo branco e outra com fundo de outra cor. Como é no relatório que vem abaixo dos gráficos. Se não for isto que ele quer, é o que eu quero saber. []s, Evandro G. de Paula Curvelo - MG evandro@skillnet.com.br (Escr. - na Cidade) imortal@skillnet.com.br (Res. - na Roça) FWH 2.6+PellesC+MyMake+xHarbour.org 0.99.5+SqlLib I PREPARATÓRIO PARA O VI ENCONTRO FIVEWIN - JULHO/2008 - CURVELO - MG Quote Link to comment Share on other sites More sharing options...
marcio1361303176 Posted January 31, 2008 Report Share Posted January 31, 2008 esse bicho parece ser bom estou apanhando dele, mas parece ser bom masterservicevrb@gmail.com Graças ao Marcelo de MUIRIAÉ-MG FWH 2.8 xh. + xDev + dbf Cdx + rpv Quote Link to comment Share on other sites More sharing options...
Spirin Sergey Posted February 1, 2008 Author Report Share Posted February 1, 2008 Hello, Evandro, citação:Olá, Suponho que ele queira uma linha com fundo branco e outra com fundo de outra cor. Como é no relatório que vem abaixo dos gráficos. Se não for isto que ele quer, é o que eu quero saber. id=quote>id=quote>Sorry, but I do not understand you too ) What do you mean? Background colors of objects? Transparent color? Or what? Quote Link to comment Share on other sites More sharing options...
Spirin Sergey Posted February 1, 2008 Author Report Share Posted February 1, 2008 Hello, by the way, Some screenshots of FastReport 4 you can look: http://fast-report.com/en/products/fast-report-4-screenshots.html Flash-demo: http://fast-report.com/en/products/fr4-flash-demo.html --- Spirin Sergey. "Paritet Soft" Company. FRH beta: http://www.paritetsoft.ru/frh.htm FRAX sales: http://www.hotsoft.ru/ALASKA/frax_eng.htm Quote Link to comment Share on other sites More sharing options...
evandro Posted February 1, 2008 Report Share Posted February 1, 2008 Olá, citação:What do you mean? Background colors of objects? id=quote>id=quote> Sim, cor de fundo, mas da linha inteira do relatório. Uma linha com uma cor e a outra linha de outra cor. É o cor sim, cor não. Para que o relatório fique "Zebrado". Veja o relatório após os gráficos no programa exemplo função DoAdo().[]s, Evandro G. de Paula Curvelo - MG evandro@skillnet.com.br (Escr. - na Cidade) imortal@skillnet.com.br (Res. - na Roça) FWH 2.6+PellesC+MyMake+xHarbour.org 0.99.5+SqlLib I PREPARATÓRIO PARA O VI ENCONTRO FIVEWIN - JULHO/2008 - CURVELO - MG Editado por - evandro on 01/02/2008 12:06:59 Quote Link to comment Share on other sites More sharing options...
Spirin Sergey Posted February 1, 2008 Author Report Share Posted February 1, 2008 citação:Sim, cor de fundo, mas da linha inteira do relatório. Uma linha com uma cor e a outra linha de outra cor. Para que o relatório fique "Zebrado". Veja o relatório após os gráficos no programa exemplo função DoAdo(). id=quote>id=quote>Not sure that undersatand correctly again, but let's try: 1. Open "ADO and Charts" in designer. 2. Select "CountryList" tab. 3. Select Memo1 (cantain [Country."Name"]) 4. In Object Inspector select "Event" tab. 5 Double-click by mouse at empty space right "OnBeforePrint". 6. Add code like: procedure Memo1OnBeforePrint(Sender: TfrxComponent); begin TfrxMemoView(Sender).Color := ; end; 7. Press F9 for preview: "Zebrado"? Quote Link to comment Share on other sites More sharing options...
evandro Posted February 1, 2008 Report Share Posted February 1, 2008 Olá, Não tem nada no Event Tab. Veja o relatório doSimpleList() ou o que vem após os gráficos. Uma linha está com letras pretas sobre fundo branco. A outra linha com letras pretas sobre fundo cinza. E assim sucessivamente. Isto dá o efeito similar à pele de uma zebra. Daà o "zebrado". []s, Evandro G. de Paula Curvelo - MG evandro@skillnet.com.br (Escr. - na Cidade) imortal@skillnet.com.br (Res. - na Roça) FWH 2.6+PellesC+MyMake+xHarbour.org 0.99.5+SqlLib I PREPARATÓRIO PARA O VI ENCONTRO FIVEWIN - JULHO/2008 - CURVELO - MG Editado por - evandro on 01/02/2008 12:51:46 Quote Link to comment Share on other sites More sharing options...
Spirin Sergey Posted February 1, 2008 Author Report Share Posted February 1, 2008 citação:Não tem nada no Event Tab. Veja o relatório doSimpleList() ou o que vem após os gráficos. Uma linha está com letras pretas sobre fundo branco. A outra linha com letras pretas sobre fundo cinza. E assim sucessivamente. Isto dá o efeito similar à pele de uma zebra. Daà o "zebrado". id=quote>id=quote>My "zebrado" was very color "zebrado" )) It seems that you do not unfrstand about "Eмуте tab". Look: http://www.paritetsoft.ru/color_zevra.JPG )) Ok. Gray and white. But it's in "Simple list" - example! - Open "Simple list" - example. - Select Memo13. - Press HighLight-button, or HighLight-property in Object Inspector. You see: Condition - mod 2 etc Quote Link to comment Share on other sites More sharing options...
evandro Posted February 1, 2008 Report Share Posted February 1, 2008 Olá, Agora sim! Tem de criar um objeto envolvendo todos os campos e na propriedade "highligth", color=cor que quiser e condition= mod 2 Aà sim, fica cor sim cornão. Estava ficando "russo"! []s, Evandro G. de Paula Curvelo - MG evandro@skillnet.com.br (Escr. - na Cidade) imortal@skillnet.com.br (Res. - na Roça) FWH 2.6+PellesC+MyMake+xHarbour.org 0.99.5+SqlLib I PREPARATÓRIO PARA O VI ENCONTRO FIVEWIN - JULHO/2008 - CURVELO - MG Editado por - evandro on 01/02/2008 14:07:50 Quote Link to comment Share on other sites More sharing options...
Spirin Sergey Posted February 4, 2008 Author Report Share Posted February 4, 2008 Hello! New example is uploaded to FRH-download area: http://www.paritetsoft.ru/frh.htm This example "answer" to frequency asked question - "from what RDD FRH can work?". FRH can work with any RDD. This example shows that FRH use current RDD and there is no difference for FRH with what RDD to work. In current example it's ADORDD that works with Access mdb-file. This is ADORDD-1 sample from MiniGui samples. Only 5 lines are added for FRH call. --- Spirin Sergey. "Paritet Soft" Company. FRH beta: http://www.paritetsoft.ru/frh.htm FRAX sales: http://www.hotsoft.ru/ALASKA/frax_eng.htm Quote Link to comment Share on other sites More sharing options...
evandro Posted February 4, 2008 Report Share Posted February 4, 2008 Olá, Com a SqlLib não consigo acessar os dados. VaÃlton, será se dá para ajudar nesta? []s, Evandro G. de Paula Curvelo - MG evandro@skillnet.com.br (Escr. - na Cidade) imortal@skillnet.com.br (Res. - na Roça) FWH 2.6+PellesC+MyMake+xHarbour.org 0.99.5+SqlLib I PREPARATÓRIO PARA O VI ENCONTRO FIVEWIN - JULHO/2008 - CURVELO - MG Quote Link to comment Share on other sites More sharing options...
Spirin Sergey Posted February 5, 2008 Author Report Share Posted February 5, 2008 Hello, Evandro, citação:Olá, Com a SqlLib não consigo acessar os dados. VaÃlton, será se dá para ajudar nesta? id=quote>id=quote>I cannot test SqlLib, but if it is workarea then it must work with FRH. So I need reproducable example. Can you make it? Without FiveWin and any interface, only with Harbour. Only after that I can say why this problem can exist. --- Spirin Sergey. "Paritet Soft" Company. FRH beta: http://www.paritetsoft.ru/frh.htm FRAX sales: http://www.hotsoft.ru/ALASKA/frax_eng.htm Quote Link to comment Share on other sites More sharing options...
dorneles Posted February 5, 2008 Report Share Posted February 5, 2008 IF ! AllFilesExist( { "CUSTA.NTX", "CUSTB.NTX" } ) USE Customer EXCLUSIVE INDEX ON CustNo TO CustA INDEX ON Company TO CustB CLOSE ENDIF Hello, where order to determine which index to use SELECT Customer SET ORDE TO 2 //CustB FW 2.6 + HB 0.9950 + Pelles + Clipper 5.3 + VLib + xDevStudio Quote Link to comment Share on other sites More sharing options...
Spirin Sergey Posted February 5, 2008 Author Report Share Posted February 5, 2008 citação:Hello, where order to determine which index to use SELECT Customer SET ORDE TO 2 //CustB id=quote>id=quote>What about you? In my code this: USE Customer NEW SET INDEX TO CustA, CustB SET ORDER TO 2 GO TOP But you can SET ORDER TO 1, if you want ) What your problem? Quote Link to comment Share on other sites More sharing options...
dorneles Posted February 5, 2008 Report Share Posted February 5, 2008 The FastReport is not respecting the order. FW 2.6 + HB 0.9950 + Pelles + Clipper 5.3 + VLib + xDevStudio Quote Link to comment Share on other sites More sharing options...
Spirin Sergey Posted February 5, 2008 Author Report Share Posted February 5, 2008 citação:The FastReport is not respecting the order. id=quote>id=quote>It's impossilble :-)))))) I do not see line: SET INDEX TO CustA, CustB at your code. Why? Quote Link to comment Share on other sites More sharing options...
dorneles Posted February 5, 2008 Report Share Posted February 5, 2008 I am doing well. This missing what else to change or determine the order. I am using the example 2gr.fr3. FrPrn:SetWorkArea("Cliente", select("Cliente")) lShowCustName := .t. DoFrAction("relgrupo.fr3") FrPrn:ClearDataSets() lShowCustName := .f. FrPrn:DestroyFr() FW 2.6 + HB 0.9950 + Pelles + Clipper 5.3 + VLib + xDevStudio Editado por - dorneles on 05/02/2008 12:20:52 Quote Link to comment Share on other sites More sharing options...
Spirin Sergey Posted February 5, 2008 Author Report Share Posted February 5, 2008 citação:I am doing well. This missing what else to change or determine the order. id=quote>id=quote>I repeat. It is TECHNOLOGICALLY impossible! FastReport can not skip records in a different order than is set in workarea. Therefore, look for your mistake -> you do not activate index. Quote Link to comment Share on other sites More sharing options...
Spirin Sergey Posted February 5, 2008 Author Report Share Posted February 5, 2008 citação:I am doing well. This missing what else to change or determine the order. id=quote>id=quote>Or, may be I do not understand you and you seek a way to set order from report only and for report-time only? If so then: procedure ReportOnStartReport(Sender: TfrxComponent); begin CallHbFunc('DbSelectArea', ['YourArea']); CallHbFunc('OrdSetFocus', [2]); end; procedure ReportOnStopReport(Sender: TfrxComponent); begin CallHbFunc('DbSelectArea', ['YourArea']); CallHbFunc('OrdSetFocus', [0]); end; Quote Link to comment Share on other sites More sharing options...
SHARK Posted February 5, 2008 Report Share Posted February 5, 2008 É realmente uma pena não poder absorver absolutamente nada deste tópico... Não tem como traduzir as respostas? Pela extensão da conversa parece ser algo bem interessante. Gostaria muito de saber o resultado destas mensagens codificadas.... rsrsrsrsrs Compartilhem conosco. Ficar tentando traduzir é atraente, excitante, porém, exaustivo... Abraços... Shark - FWH 2.6 / xharbour 0.99.5 / xMate 1.15 / Resource WorkShop Quote Link to comment Share on other sites More sharing options...
dorneles Posted February 5, 2008 Report Share Posted February 5, 2008 In DesignReport () with the component [x]Harbour WorkArea, as you determinal which order of the index that will use. Olá SHARK, o FastReport é uma otima ferramenta mas para [x]Harbour fivewin ainda esta em beta, mas esta quase saindo a versão full, já estou conseguindo fazer alguns relatórios, mas o caminho das pedras esta dificil. FW 2.6 + HB 0.9950 + Pelles + Clipper 5.3 + VLib + xDevStudio Quote Link to comment Share on other sites More sharing options...
kleyber Posted February 5, 2008 Report Share Posted February 5, 2008 Grande Dorneles, E por favor não responda mais em RUSSO!!! (hehehe) Senão aà é que fica difÃcil a coisa. Grande abraço, Kleyber Derick xHarbour 99.71 + FWH 7.11 (BMW Zerada!!!) + xDevStudio + SQLLIB Visite São LuÃs - MA A Ilha dos Amores Quote Link to comment Share on other sites More sharing options...
Spirin Sergey Posted February 5, 2008 Author Report Share Posted February 5, 2008 citação:In DesignReport () with the component [x]Harbour WorkArea, as you determinal which order of the index that will use. id=quote>id=quote>Ok. It seems I was right. See "More Complex in FR-only": procedure ReportOnStartReport(Sender: TfrxComponent); begin CallHbFunc('DbSelectArea', ['YourArea']); CallHbFunc('OrdSetFocus', [2]); end; procedure ReportOnStopReport(Sender: TfrxComponent); begin CallHbFunc('DbSelectArea', ['YourArea']); CallHbFunc('OrdSetFocus', [0]); end; Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.