wcardosomg
wcardosomg
About
- Username
- wcardosomg
- Joined
- Visits
- 0
- Last Active
- Roles
- Members
Comments
-
I Solved this whith code procedure DBCross1Row1OnBeforePrint(Sender: TfrxComponent);     begin                                                                         i…
-
Slashmaster wrote: » well.. why it starts with Number 1 at the new page? NCG is White and receita is Grey --> seems correct? Correct, in another collumns i use the condition mod 2 = 1 in highligth condition
-
Slashmaster wrote: » [img]style_emoticons/<#EMO_DIR#>/laugh.gif" style="vertical-align:middle" emoid="" border="0" alt="laugh.gif" /> is this the same dbcross???[/img] Yes
-
Oh no!, works fine only on first page of report.... See the second page..
-
pele wrote: » if z then tfrxmemoview(sender).color := clred        else tfrxmemoview(sender).color := clWhite tks pele and SlashMaster, work's fine z := not z;    if z then tfrxmemoview(sender).color := clred    …
-
Slashmaster wrote: » var z : boolean; Needs to stand on the top (over the other procedurs) U declare a global Variable.
-
Slashmaster wrote: » Hi, u could try something like this: var z : boolean;    procedure DBCross2Row1OnBeforePrint(Sender: TfrxComponent); begin   z := not z;    if z then tfrxmemoview(sender).color := clred            …
-
Slashmaster wrote: » Good morning wcardosomg, could u explain ur Problem more exactly? U want to Color 2 Rows alternately? Row1 Row2 Row3 Row4 Row5 Row6 Row7 Row8 ? Greetz Good morning Slashmaster, i want to color the bac…
-
Thank's SlashMaster for the attention.. pele your code works fine! thank's
-
I Try this, report compile, but dont works... if TfrxMemoView(Sender).Text = 'NCG' then begin TfrxMemoView(Sender).font.color:=clred; end;
-
Slashmaster wrote: » try exactly: if Sender.text = 'NCG' then Sender.font.color := clred the text from "dbcross1row1.text" isn't the same like "Sender.text" at the Moment "onbeforeprint". Slashmaster, thank's for the help, but don't …
-
Slashmaster wrote: » Hello wcardosomg, u could use the on before Print-Event of the Cell Basic-Script sub DBCross1Row2OnBeforePrint(Sender) if sender.text <> "NCG" then sender.font.color = clred                    …