Page 2 of 2

Re: Folder Itemsize

PostPosted: Wed Feb 03, 2010 8:22 pm
by Antonio Linares
Dietmar,

Please wait, I am testing the code myself and there is something wrong...

I am checking it

Re: Folder Itemsize

PostPosted: Wed Feb 03, 2010 8:57 pm
by Antonio Linares
Dietmar,

Please try it this way:
Code: Select all  Expand view

    ACTIVATE DIALOG oDlg CENTER ;
       ON INIT AEval( oFolder:aDialogs, { | o | o:Move( o:nTop + 5, o:nLeft ), o:nHeight -= 4 } )
 

This is a workaround to see if we recover that missing line. Later on we will try to discover why such line is missing. Thanks,

Re: Folder Itemsize

PostPosted: Thu Feb 04, 2010 8:02 am
by Dietmar Jahnel
Code: Select all  Expand view

REDEFINE Folder SuchFolder ID 210 OF sDlg UPDATE;
                Prompts " Entscheidungen/Literatur " , " Gesetzessuche ", " Kommentare " ;
                DIALOGS "Suchschirm2", "Gesetzessuche", "Kommentare";
                OPTION 1;
                ON CHANGE( SetFoREDEFINElder( SuchFolder, nOption, nOldOption ) )

SuchFolder:nFdHeight += 35
 


Result: see the buttom of the folder

Image

Re: Folder Itemsize

PostPosted: Sun Feb 07, 2010 7:52 am
by Antonio Linares
Dietmar,

Please don't use this code:
Code: Select all  Expand view

SuchFolder:nFdHeight += 35
 

Do it as explained here:
viewtopic.php?p=94168#p94168

Re: Folder Itemsize

PostPosted: Sun Feb 07, 2010 10:10 am
by Dietmar Jahnel
Thank Antonio,
The workaround ist working fine! :D
Dietmar

Re: Folder Itemsize

PostPosted: Sun Feb 07, 2010 11:37 am
by Antonio Linares
very good :-)