From baca1c614ad4e9c7a255e7882f02494a3404a40a Mon Sep 17 00:00:00 2001 From: Pritpal Bedi Date: Tue, 24 Nov 2009 02:08:19 +0000 Subject: [PATCH] 2009-11-23 18:09 UTC-0800 Pritpal Bedi (pritpal@vouchcac.com) * contrib/hbide/hbide.prg ! Few more additions. --- harbour/ChangeLog | 4 ++++ harbour/contrib/hbide/hbide.prg | 20 ++++++++++++++++++-- 2 files changed, 22 insertions(+), 2 deletions(-) diff --git a/harbour/ChangeLog b/harbour/ChangeLog index ff8717998c..d48b327601 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -17,6 +17,10 @@ past entries belonging to author(s): Viktor Szakats. */ +2009-11-23 18:09 UTC-0800 Pritpal Bedi (pritpal@vouchcac.com) + * contrib/hbide/hbide.prg + ! Few more additions. + 2009-11-24 02:51 UTC+0100 Przemyslaw Czerpak (druzus/at/priv.onet.pl) * harbour/src/vm/dlmalloc.c * harbour/src/vm/hvmall.c diff --git a/harbour/contrib/hbide/hbide.prg b/harbour/contrib/hbide/hbide.prg index 60074f56cc..5d5b1fa6f1 100644 --- a/harbour/contrib/hbide/hbide.prg +++ b/harbour/contrib/hbide/hbide.prg @@ -955,12 +955,28 @@ METHOD HbIde:CreateTags() //----------------------------------------------------------------------// METHOD HbIde:fetchNewProject() -#if 1 // In Development + LOCAL oBtnOK, oBtnCancel, qLayout + ::oNewDlg := XbpWindow():new( ::oDlg ) ::oNewDlg:oWidget := QDialog():new( QT_PTROFXBP( ::oDlg ) ) + + oBtnCancel := XbpPushButton():new( ::oNewDlg, , {0,0}, {100,30}, , .t. ):create() + oBtnCancel:setCaption( "Cancel" ) + + oBtnOK := XbpPushButton():new( ::oNewDlg, , {0,100}, {100,30}, , .t. ):create() + oBtnOK:setCaption( "Ok" ) + + qLayout := QGridLayout():new() + //qLayout:setColumnStretch( 1,1 ) + qLayout:setColumnMinimumWidth( 1,250 ) + + qLayout:addWidget_1( QT_PTROFXBP( oBtnOK ), 0, 0 ) + qLayout:addWidget_1( QT_PTROFXBP( oBtnCancel ), 1, 0 ) + + ::oNewDlg:oWidget:setLayout( QT_PTROF( qLayout ) ) + ::oNewDlg:oWidget:exec() -#endif RETURN self /*----------------------------------------------------------------------*/