Default Avatar

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                    …