Question

Hi,
how can I use the onDblClick Event in phSchema.
I would like to open a new window if i dblclick on an schematimeitem.

Answer

you can access the currently active SchemaTime (the latest clicked) with the ActiveDataEntity property:

  if Assigned(phSchema1.ActiveDataEntity) then
  begin
    phSchema1.RemoveSchemaTime(phSchema1.ActiveDataEntity);
  end;

Or you can use the info about clicked column and time:

var
  aphSchemaTime:TphDataEntity_SchemaTime;
begin
  if phSchema1.MouseDownColumn<>nil then
  begin
    aphSchemaTime:=phSchema1.AddSchemaTime(0);
    aphSchemaTime.Start:=phSchema1.MouseDownDateTime-1;
    aphSchemaTime.Stop:=phSchema1.MouseDownDateTime-1;
    aphSchemaTime.Col:=phSchema1.MouseDownColumn.ListIndex;
    aphSchemaTime.BackColor:=Random(65000);
  end;

Question

I have 3 questions. I am using the phGant control in VB.

1. I want to color the background several rows in the grid, I ‘m using 4 columns in treegrid, how can I do this?

2. How can I edit the text in a time item?

3. How can I iterate through the timetems in the RootDataEntitiesTree and change the start from the timeitems, timeitems on the second level are unchanged

Thank you very much in advance.

Answer

To set seperate background colors in the grid you need to assign GridLayoutproperties to the cells. To declare GridLayoutProperties you go like this:

  phGantX1.GridLayoutPropAdd
  phGantX1.GridLayoutPropAdd
  phGantX1.GridLayoutPropAdd
 
  phGantX1.GridLayoutPropSet 0, ColorConstants.vbYellow, ColorConstants.vbBlack, “Helvetica”, 8, 20, 20, False, True, False, True, False
  phGantX1.GridLayoutPropSet 1, ColorConstants.vbRed, ColorConstants.vbBlack, “Helvetica”, 8, 20, 20, False, True, False, True, False
  phGantX1.GridLayoutPropSet 2, ColorConstants.vbBlue, ColorConstants.vbWhite, “Helvetica”, 8, 20, 20, False, True, False, True, False

And to use them on a specific cell you go can use the IphGantX3.SetGridCellLayoutPropIndex method.

2. There is currently no support to edit time item texts. If you need to you can bring up a dialog with an edit box. your would then use IphDataEntity_GantTime2.TimeItemsTextSet to update the text with the new value.

3. To iterate thru time items you go like this:

for(int i=0;i<axphGantX1.DataList3levGantTimes().Count();i++)

for(int ii=0;ii<aList2Lev.Count();ii++)

for(int iii=0;iii<aList.Count();iii++)

as phGantXControl.IphDataEntity_GantTime2;

Question

I purchased the Gantt Time Package ActiveX a few years ago and it is working wonderfully. However, I switched to a new development PC which is running Win XP x64. I cannot get the plexityHide gantt installation program to run on this OS so that I can continue to develop my app in VB 6. All my other 32 bit components install and run fine on this machine.

Can you suggest a way that I can install the Gantt component on my XP 64 bit system. I feel certain that the component itself will work fine on this machine. I think it is just a restriction on the setup program.

Answer

If you still have a 32-bit system with the installation you can simply move the files from the installation folder.

The only important registration that takes place during installation is the regsvr32.exe call on the ocx, so you must do that by hand.( at the run prompt write regsvr32 <path>/phGantTimePackage.ocx).

Question

I posted a Question half a year ago:

Can you have horizontal lines across the Gantt chart? Our users do not want Pyjama alternative colours but have requested horizontal lines to distinguish rows.

The answer was: draw a line using GDI. We did this, but there are difficulties with printing. You have to make a (nonlinear) correction for vertical line distances for different rowheights, for the report to display the same as the monitor-gantt. Also big problems arise when you have different rowheights within one ganttchart.

The reason why many user prefer horizontal lines is clear: as a black/white print output it is clearer and saves ink.

Will you offer horizontal lines as a standardfeature in future, as an alternative to pyjamas?

Answer

Sure we could extend the API to allow for row separating lines, but if there are issues with positioning user drawn things when printing we would like to fix it. Chances are that there is some simple mistake in your current code. Can you send me a sample showing the problems you have with printing and positioning of your user drawn lines and I will take a look at it…

Question

with the ActiveX version of the control hosted on a web page, is it possible through script to block out specific days on the gantt chart like making weekends a different color? If so, how.

Answer

If you embed the ocx on a web page you can choose to write VB- or JScript on that page that will access the Gantt on the client side. Since the access to win32 functions are often very restricted on the client side you will have a hard time accessing drawing functionality that is needed to use the Back- and Foreground events.

A better solution is to produce your own ActiveX that uses the phGantTimePackage and put all the extra drawing stuff in that ActiveX, the user will then accept your control for download or not.

To hide certain days from view your can simply call IphGantX3.SetHiddenHour and IphGantX3.SetHiddenDayType from VBScript or JScript.