ANN: "FastReport for [x]Harbour" (FRH) beta, trial

dorneles · 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

Spirin Sergey · 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.

evandro · 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

marcio1361303176 · 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

Spirin Sergey · 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?

Spirin Sergey · 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

evandro · 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

Spirin Sergey · 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"?

evandro · 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

Spirin Sergey · 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

evandro · 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

Spirin Sergey · 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

evandro · 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

Spirin Sergey · 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

dorneles · 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

Spirin Sergey · 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?

dorneles · February 5, 2008

The FastReport is not respecting the order.

my.php?image=imagem2kn2.jpg

FW 2.6 + HB 0.9950 + Pelles + Clipper 5.3 + VLib + xDevStudio

Spirin Sergey · 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?

dorneles · 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

Spirin Sergey · 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.

Spirin Sergey · 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;

SHARK · 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.

AbraÃ§os...

Shark - FWH 2.6 / xharbour 0.99.5 / xMate 1.15 / Resource WorkShop

dorneles · 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

kleyber · February 5, 2008

Grande Dorneles,

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

Spirin Sergey · 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;

ANN: "FastReport for [x]Harbour" (FRH) beta, trial

Recommended Posts

Link to comment

Share on other sites

Top Posters In This Topic

Popular Days

Top Posters In This Topic

Popular Days

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Join the conversation