1 Reply by 01xbruno

(2 replies, posted in General)

Thank you very much Dmitri !!!

Go to forum: General

2 Topic by 01xbruno

(2 replies, posted in General)

Hi,

OK, now i have my beautiful application done in MVD. How can I put it all of it on my website?

Keep in mind I don't need anybody else to access it, only me. Even if somebody else wants to use it it would be one person at the time.

I have looked a bit around and saw SQLite could be a way, but I cannot find any tutorial on how to do it. My website is a Windows server system.

Thank you for show me the way....

Bruno

Go to forum: General

3 Reply by 01xbruno

(8 replies, posted in General)

Derek, Jean

Indeed the combination of the 2 solutions are the SOLUTION.

See the Derek sample after adding the Form1.GridEmployees.EnableVisualStyles := False;

So the solution is:

1) Add to the final Begin Form1.GridEmployees.EnableVisualStyles := False; end.
2) tablegrid headerstyle property set to 'hsauto'

Great. I hope will help others too.

Thank you guys....

Go to forum: General

4 Reply by 01xbruno

(8 replies, posted in General)

Thank you Derek,

the HeaderStyle set to anything else than hsAuto stopped the formatting.

The sample you sent me was not changed, I include picture of it with the hsAuto on. The header is not colored, perhaps the suggestion of Jean:

frmSearch.edTableGrid1.EnableVisualStyles := False;

did the trick...

I will try it.

thanks again for the help and let's hope Dmitry will find about the other options ( hsOffice2007 etc) why they do not allow for formatting...

Bruno

Go to forum: General

5 Reply by 01xbruno

(8 replies, posted in General)

Just for info, here is my script section:

procedure frmSearch_edTableGrid1_OnChange (Sender: String);
begin

          frmSearch.edTableGrid1.Columns[0].Font.Style := fsBold;
        frmSearch.edTableGrid1.Columns[2].Header.Color := $0066FF66; //this is for the header text color
        frmSearch.edTableGrid1.Columns[1].Header.Color := clRed;
        frmSearch.edTableGrid1.Columns[0].Header.Color := clMoneyGreen;
          frmSearch.edTableGrid1.Columns[0].Header.Alignment := taCenter;
          frmSearch.edTableGrid1.Columns[1].Header.Alignment := taCenter;
          frmSearch.edTableGrid1.Columns[2].Header.Alignment := taCenter;
          frmSearch.edTableGrid1.Columns[0].Footer.Color := clLime; //this is for the footer text color
          frmSearch.edTableGrid1.Columns[0].Footer.Alignment := taCenter;
          frmSearch.edTableGrid1.Columns[2].Options :=frmSearch.edTableGrid1.Columns[2].Options - coShowTextFitHint; // for third column

end;

procedure frmDataEntry_edLink_OnDoubleClick (Sender: TObject);
begin

end;


begin
     frmSearch.mniFile.Visible := False;
     frmSearch.mniOptions.Visible := False;
     frmSearch.mniAbout.Visible := False;
     frmSearch.edTableGrid1.EnableVisualStyles := False;

end.


I have attached the test file for your perusal.

Thanks

Bruno

Go to forum: General

6 Reply by 01xbruno

(8 replies, posted in General)

Thanks Jean,

I tried both your solutions, but no luck.

I am attaching a picture to show what I mean.

For your info, I have also changed the HeaderStyle in the Object inspector to ALL options but no difference.

Go to forum: General

7 Reply by 01xbruno

(8 replies, posted in General)

Thanks Derek,

Thank you for the help but your sample does not have any color in the header of the table.

All I see is a green cell in the footer where there is the total of the entries.
i see your script, and like mine, does nothing as far changing color on the header.

I will try the other option now from Jean....

Thanks again

Bruno

Go to forum: General

8 Topic by 01xbruno

(8 replies, posted in General)

Hi,

I would like to format the header of my tablegrid, but seems I cannot find an answer.

what is odd, is that the following are working:

         frmSearch.edTableGrid1.Columns[0].Font.Style := fsBold;
          frmSearch.edTableGrid1.Columns[0].Header.Alignment := taCenter;
          frmSearch.edTableGrid1.Columns[1].Header.Alignment := taCenter;
          frmSearch.edTableGrid1.Columns[2].Header.Alignment := taCenter;
          frmSearch.edTableGrid1.Columns[0].Footer.Color := clYellow; //this is for the footer text color
          frmSearch.edTableGrid1.Columns[0].Footer.Alignment := taCenter;

which include also the Header alignment.

But these:

         frmSearch.edTableGrid1.Columns[0].Header.Color := $0066FF66; //this is for the header text color
         frmSearch.edTableGrid1.Columns[1].Header.Color := clRed;
         frmSearch.edTableGrid1.Columns[2].Header.Color := clMoneyGreen;

are totally ignored. No errors compiling, just no change in my table header.

Am I too stupid or I am missing something?

version 4.1 used

thank you for your help !!!

Go to forum: General