XProfan

- Page 2 -

Rolf
Koch

parent contains the value 0

- Page 3 -

Compile Mark Separation

var PARENT&=call(__cf1&,65556,0,ComboLBox,0)

to Info: here becomes FindWindowExA called. for 65556 could one too %Desktop write and on %Desktop find itself in the rule several Window this class (see Tasks and Token).

Since I no XProfan10 have, give I The further Ursachenforschung first at times The others ex.

alas Yes - and %Desktop is naturally not each system 65556 - How gesasgt, something windy the code....

Ralph
Theobald

Hello ,

who becomes because same into breeze weg .

Vielen Thanks first all for rege Teilnahme on the trouble.

If I have your code something modifiziert. in the Interpreter walk the two versions
of course different, but tappt im dunkeln walk.
Compiled are you faith I do not To use
Compile Mark Separation

DECLARE __cf1&,__cf2&
Def __cf1(2) !KERNEL32,GetProcAddress
Def __cf2(1) !KERNEL32,GetModuleHandleA
__cf1&=__cf1(__cf2(user32.dll),FindWindowExA)
__cf2&=__cf1(__cf2(user32.dll),GetAsyncKeyState)
CLS
var STATIC&=CREATE(choicebox,%HWND,Choicebox,16,16,560,180)
USERMESSAGES 16,$0134

WHILE 1

    WAITINPUT

    SELECT %UMESSAGE

        CASEOF 16

        BREAK

        CASEOF $0134

        PROCEEDCHOICEBOX
        OTHERWISE

    ENDSELECT

ENDWHILE

end

proc PROCEEDCHOICEBOX

    var TITEL$=Links;0;80;Mitte;2;100;Rechts;1;80
    var PARENT&=call(__cf1&,65556,0,ComboLBox,0)
    var HGRID&=CREATE(GridBox,%HWND, TITEL$, 3,16,40,WIDTH(PARENT&),HEIGHT(PARENT&))
    SENDKEY(PARENT&,27)
    ADDSTRING(HGRID&,AB|DEF|0123)
    ADDSTRING(HGRID&,GHI|J23KL|012345)
    WAITINPUT
    var S$=

    IF GETCURSEL(HGRID&)>-1

        S$=GETSTRING$(HGRID&,GETCURSEL(HGRID&))

    ENDIF

    DESTROYWINDOW(HGRID&)
    Combobox_if1          DESTROYWINDOW(HGRID&)  auskommentiert
    Combobox_if2          DESTROYWINDOW(HGRID&) im code enthalten

    IFNOT S$=

        LOCATE 20,1
        PRINT Ausgewählt: ,S$

    ENDIF

../function-references/XProfan/endproc/'>endproc

Greeting Ralph

Combobox_if.zip	645 kB

Hochgeladen:	03/08/07

Downloadcounter:
		Download

Xprofan 10 , AMD Athlon 3000+, 1GB

Ralph
Theobald

on any,

the two obigen versions walk only under Win XP, XProfan 10
with of/ one Version appear The List view, one clicking a entry on,the Result becomes
displayed.the box works again.

with the others Version can The Column adjust , one Result becomes
outputted, but only once.

Both together would ideal.

Compilat: 1: LV becomes displayed, Entries can select , go but
not outputted

Compilat 2: spending results only to each 3. Click,

under XProfan 8 , w2k works The box only short on

Greeting Ralph

Xprofan 10 , AMD Athlon 3000+, 1GB

RGH

Ralph Theobald

under Win2k , XProfan 8 How with Andreas .

me wundert not, that Gridboxen not under XProfan 8 functions, there it The first since XProfan 10 gives!

Roland

Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4

RGH

me wundert not, that Gridboxen not under XProfan 8 functions, there it The first since XProfan 10 gives!

Roland

too The with XProfan10 compilierte EXE goes there not (You Scherzkecks You

)

Herjeh it went me in first line therefore on a Solution with Usermessages

umzustellen, %desktop

have I do not with 65556 meant - Have here in the haste To volatile recherchiert.

Ralph
Theobald

If I one gridbox z.B. in a Rebar set, undertaking windows The
management the Controls , once I it anklicke.

I have me the lever the Listbox by the Callback provides.If someone
another Possibility knows , then since so.

i'll it time yet with the List view.dll try, but the goes probably neither.

as Solution can I me only present:

1. spending inside the Callbackroutine. (To costly)
2. the lever the Listbox without Callback (How?) ,then should Ifs method without
this ominösen Call klappen !?

it wundert me not ,that it with the Programming the Controls in Windoof evident none red filament gives. at that Rebar setting to the Control in that volume , windows fit automatically The Size the Controls on The Size the Bandes on.with the Choicebox functions the so not. take off a makes sense then the commands
Setparent ?

Greeting Ralph

Xprofan 10 , AMD Athlon 3000+, 1GB

the lever the Listbox without Callback (How?) ,then should Ifs method without
this ominösen Call klappen !?

I know evtl. How, can I but not testing - no XP and no XProfan10, sorry. And if one on my endeavours of them I personally nothing do not have reacted, have so did i sometime no pleasure More - is still einsehbar - or? Tschau.

PS: One Tool, the to that example with the development such such very good services Leisten could, would Tasks and Token - there sees one quite very where it windy and is Why.

Ralph
Theobald

Hello Andreas,
excuse , but I wished you not pass over.I have me with all bedankt
The me helped having.so meant so did i you.
unfortunately be I do not so one begnadeter Programmer as most here, therefore
question I Yes.
To task & Token : I have me the program installs, but I betreibe Profan only
as hobby, therefore need I always something longer circa me into new
programs einzuarbeiten.I have with Spy++ attempts The Messages abzufangen,
but without success.
I see the whole incidentally very How You, possible no undokumentierten command
or Tricksereien, The only on one computer,one Betriebssystem or of/ one
xprofanversion walk produce.

Vielen Thanks

Ralph

Xprofan 10 , AMD Athlon 3000+, 1GB