To Mr. frose
Posted: 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
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