To Mr. frose

To Mr. frose

Postby Otto » Wed Apr 18, 2012 1:33 pm

Hello Frank,

Revised AutoCode:

http://www.atzwanger-software.com/fw/ACD5DEMO.Zip

Enhancement:
Implemented Mr Froze's requirement.
examples : oDlg := TDialog():New( ..... ). etc/

This functionality is intended to work for all translates contained in all the *.ch files in the \fwh\include folder. The internal logic is directly derived from the *.ch files of FWH

Number of such functions are too many and therefore they are not available in the combobox. Only way is to paste some sample code.

Best regards,
Otto

Otto,

Autocode is very useful for me, I'll integrate it in my workflow from now on.

Even though it's working without crash, this error comes up: c:\fwh\include\Objects.ch(5) Error F0029 Can't open #include file 'hbclass.ch'

And I have two wishes:
- Can you save the position and the dimensions of the dialogs and also the state of the browse, e.g. in an ini file, so you can restore it for the next start
- I also use the class syntax, perhaps it is possible to add it, doing something like this:

Input:Code: Select all Expand view
oCbx := TComboBox():New( p1, p2, { | u | If( PCount() == 0, p8, p8 := u ) }, p7, , , oDlg, , , , 0, 16777215, .T., oFont_default, , .F., , .F., , , , , )

Output:Code: Select all Expand view
oCbx := TComboBox():New( ;
p1, ; // nRow
p2, ; // nCol
{ | u | If( PCount() == 0, p8, p8 := u ) }, ; // bSetGet
p7, ; // aItems
, ; // nWidth
, ; // nHeight
oDlg, ; // oWnd
, ; // nHelpId
, ; // bChange
, ; // bValid
CLR_BLACK, ; // nClrText
CLR_WHITE, ; // nClrBack
.T., ; // lPixel
oFont_default, ; // oFont
, ; // cMsg
.F., ; // LUpdate
, ; // bWhen
.F., ; // lDesign
, ; // acBitmaps
, ; // bDrawItem
, ; // nStyle
, ; // cPict
) // bEChange


regards, saludos, gruß

Frank (frose)
FWH 12.02, xHarbour.com Okt. 2011 (9382), xCC, ADS 10.10.0.28, Windows 7 x64
Transitioning to xHarbour.org, MSVC 2010
********************************************************************
mod harbour - Vamos a la conquista de la Web
modharbour.org
https://www.facebook.com/groups/modharbour.club
********************************************************************
User avatar
Otto
 
Posts: 6015
Joined: Fri Oct 07, 2005 7:07 pm

Re: To Mr. frose

Postby frose » Wed Apr 18, 2012 2:15 pm

Otto,

it's working, thank you
Windows 11 Pro 22H2 22621.1848
Microsoft (R) Windows (R) Resource Compiler Version 10.0.10011.16384
Harbour 3.2.0dev (r2008190002)
FWH 23.10 x86
User avatar
frose
 
Posts: 392
Joined: Tue Mar 10, 2009 11:54 am
Location: Germany, Rietberg


Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 19 guests