XProfan

Italia

Georg

Ciao,

ich möchte eine editierbare Combobox erstellen. Bei der Eingabe in die Combobox soll sich die Combobox sofort aufklappen ohne dass ich auf den Pfeil klicken muß.

13.01.2012 ▲

Vollständiges Zitat

Absatzweise Citazione Zeilenweise Citazione

Grüße,

wie sieht denn Deine Grundkonstruktion bisher aus und hast Du Dir bereits schon einmal per Control-Spy (von Microsoft) die verschiedenen ComboBox-Stile angeschaut und eventuell auch schon Konstantinopel ( [...]

) per Stil- und Nachrichtenkonstanten geladen?

XProfan X2
Vista (TM) Home Premium, SP2, Core(TM)2 Duo P8600 @ 2.40GHz

13.01.2012 ▲

Vollständiges Zitat

Absatzweise Citazione Zeilenweise Citazione

Georg

Konstruktion

hD2% =@Control("ComboBox","",$5421034E,80,50,100,40,%hwnd,2000,%hinstance,$0)

eigentlich müßte mit sendmessage $7 meiner Meinung nach die Combobox aufklappen, tut mir aber den gefallen nicht.

13.01.2012 ▲

Vollständiges Zitat

Absatzweise Citazione Zeilenweise Citazione

Peter
Max
Müller

Probiere mal:
Kompilieren Markieren Separieren

SendMessage(CoBo&,~CB_SHOWDROPDOWN, 1, 0)

und
Kompilieren Markieren Separieren

SendMessage(CoBo&,~CB_SHOWDROPDOWN, 0, 0)

XProfan X3, X4ß, Win 10.1

13.01.2012 ▲

Vollständiges Zitat

Absatzweise Citazione Zeilenweise Citazione

Georg

ok das funktioniert. Aber ich Frage ab ob die Combobox angeklickt ist und dann sendmessage. Klicke ich woanders auf dem Bildschirm tut das programm so als ob ich die Combobox angeklickt habe und sendet die Message wieder. Kann ich das cklicked zurücksetzen? Schreibe mir die Lastmessage in un File, aber damit kann ich nicht viel anfangen bringt immer 307
Kompilieren Markieren Separieren

ElseIf clicked(hD2&)'Combobox

SendMessage(hD2&,$14F, 1, 0)
Assign #1, "c:\\SQLBasys\\MsgLog.Txt"
APPEND #1

If %IOResult

    Print "Datei kann nicht geöffnet werden."

else

    Print #1, %lastmessage

endif

CLOSE #s2>1

18.01.2012 ▲

Vollständiges Zitat

Absatzweise Citazione Zeilenweise Citazione

Clicked scheint da ungeeignet -

hast Du schon getFocus(... getestet?

XProfan X2
Vista (TM) Home Premium, SP2, Core(TM)2 Duo P8600 @ 2.40GHz

18.01.2012 ▲

Vollständiges Zitat

Absatzweise Citazione Zeilenweise Citazione

Georg

Ja habe ich aber wenn ich getfocus(Combobox&) abrufe kommt, obwohl ich draufgeklickt habe und die Box den Focus, hat immer 0

19.01.2012 ▲

Vollständiges Zitat

Absatzweise Citazione Zeilenweise Citazione

E.T.

...irgendwo hatte ich das auch schon mal, nur wo

Ich glaub, ich hab das Clicked und die Focus-Abfrag irgendwie kombiniert:
Kompilieren Markieren Separieren

...

ElseIf clicked(hD2&) AND getfocus(hD2&)

/pre>

probier mal, dann sollte Clicked auch nur greifen, wenn du wirklich mit der Maus da klickst, wo das Clicked herkommt

XProfan X2
Grüße aus Sachsen... Mario
WinXP, Win7 (64 Bit),Win8(.1),Win10, Win 11, Profan 6 - X4, XPSE, und 'nen schwarzes, blinkendes Dingens, wo ich das alles reinschütte...

19.01.2012 ▲

Vollständiges Zitat

Absatzweise Citazione Zeilenweise Citazione

Georg

Danke habs probiert. Geht nicht da getfocus(hd2&) immer = 0

19.01.2012 ▲

Vollständiges Zitat

Absatzweise Citazione Zeilenweise Citazione