XProfan

- page 5 -

Jac
de
Lad

<Quengeln>Ich sais, cela du rien plus einbauen veux, Roland, mais je vermise irgendwie encore SetCurSel pour Comboboxen, Gridboxen, Listboxen...(ou bien je habs wieder la fois übersehen). cela allez zwar aussi avec sendmessage, mais si mans de qui page betrachtet sommes certains Befehle überflüssig (GetCurSel, GetCount...) </Quengeln>

Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP

20.09.2006 ▲

peut-être pourrait Roland oui encore - hrm - pour Sorgen cela cela fürchterliche Refreshing de %hwnd beim finissons eines Trackmenus aufhört. (c'est quelque chose comme de stööörend!)

24.09.2006 ▲

Torsten
Rümker

Habe folgendes festgestellt

[...]

J'ai pensé je weise aussi ici la fois puis hin.

MfG
Torsten

Ich lerne, ob ich will oder nicht!
Betriebssystem:
- Ubuntu 15.x
- Windows (diverse)
XProfan Version: X2

28.09.2006 ▲

Michael
Wodrich

ah c'est pourquoi cela Fischauge
(cela incidemment seulement comme solches trop erkennen ist, si on une 1000matière-Zoom sur elle losläßt - et ensuite aussi seulement avec viel Wohlwollen. WEG DAMIT !!! - DAS GLOTZT MICH AN!!!)

entier honnête: chez $TempDir hätte je déjà erwartet, qui là qui Langname steht, den on ensuite - si gewünscht - avec ShortName$ abréger peux.

belle Grüße
Michael Wodrich

Programmieren, das spannendste Detektivspiel der Welt.

RGH

[quote-part:282a4bec64=Michael Wodrich]entier honnête: chez $TempDir hätte je déjà erwartet, qui là qui Langname steht, den on ensuite - si gewünscht - avec ShortName$ abréger peux.[/quote-part:282a4bec64]
Tja, mais qui Windows-API liefert offensichtlich eh bien la fois den Kurznamen. (GetTempPath est qui zugrundeliegende API.)

Salut
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

Michael
Wodrich

eh bien, erwähnen wirs arrêt dans den Hilfen - ensuite gibts oui toujours qui Funktion LangName$.

belle Grüße
Michael Wodrich

Sorry, naturellement LongName$()

Programmieren, das spannendste Detektivspiel der Welt.

Michael
Wodrich

aussi sur qui péril, cela alles déjà festgezurrt et eingetütet ist:

Uns fehlt dans XProfan cela binäre NOT.

qui dans qui Hilfedatei beschriebene Notnagel sieht nämlich chez genauer Betrachtung entier joli krumm aus:
Kompilieren Marque Séparation

declare sync&
sync& = $100000
cls
print hex$(sync&), sync&
print hex$(not(sync&)), not(sync&)
print " "
Def @BNot(1) @XOr(@&(1), @Val("%" + @MkStr$("1", Len(Bin$(@&(1))))))
print hex$(sync&), sync&
print hex$(bnot(sync&)), bnot(sync&)
waitkey

Programmieren, das spannendste Detektivspiel der Welt.

Michael
Wodrich

[quote-part:7234659561]bien, avec quelque chose Grips tüddelt on sich cela hin [/quote-part:7234659561]
Au weia, qui Solution qui je trouvé habe tut richtig weh.

comment longtemps brauchen eigentlich HY-Indianer (pour qui Stoppuhr) pour cet Solution.

devoir: erstelle un binäres NOT

oui maintenant sais ego. Ist un un peu très simple, mais toujours si on cela Ding braucht venez on sur so simple Dinge simple pas.

belle Grüße
Michael Wodrich

Programmieren, das spannendste Detektivspiel der Welt.

Kompilieren Marque Séparation

Michael
Wodrich

Def @BNot(1) @XOr(@&(1), @Val("%" + @MkStr$("1", Len(Bin$(@&(1))))))
declare sync&,not_sync&
sync& = $100000
not_sync& = $FFFFFFFF - sync&
set("decimals", 0)
cls
print "zu wandelnde Zahl"
print "hex: $";hex$(sync&)
print "dez:", sync&
print "bin: %";bin$(sync&)
print " "
print "mit NOT() verarztet"
print "hex: $";hex$(not(sync&))
print "dez:", not(sync&)
print "bin: %";bin$(not(sync&))
print " "
print "mit BNOT() verarztet"
print "hex: $";hex$(bnot(sync&))
print "dez:", bnot(sync&)
print "bin: %";bin$(bnot(sync&))
print " "
print "die qzu Fußq-Methode"
print "hex: $";hex$(not_sync&)
print "dez:", not_sync&
print "bin: %";bin$(not_sync&)
print " "
waitkey
sync& = %10010
not_sync& = $FFFFFFFF - sync&
cls
print " "
print "hier ists besser zu sehen..."
print " "
print "zu wandelnde Zahl"
print "hex: $";hex$(sync&)
print "dez:", sync&
print "bin: %";bin$(sync&)
print " "
print "mit NOT() verarztet"
print "hex: $";hex$(not(sync&))
print "dez:", not(sync&)
print "bin: %";bin$(not(sync&))
print " "
print "mit BNOT() verarztet"
print "hex: $";hex$(bnot(sync&))
print "dez:", bnot(sync&)
print "bin: %";bin$(bnot(sync&))
print " "
print "die qzu Fußq-Methode"
print "hex: $";hex$(not_sync&)
print "dez:", not_sync&
print "bin: %";bin$(not_sync&)
print " "
waitkey
/../../function-references/XProfan/end/'>end

Programmieren, das spannendste Detektivspiel der Welt.

RGH

Thema @Not()

cela Problem beim binären NOT(wert) ist arrêt, qui on sich einigen doit, um combien Bits und dir, là aus führenden 0-Bits oui logischerweise führende 1-Bits volonté. autre Sprachen prendre quelquefois den kleinstmöglichen Integertypen, dans den qui Wert reinpaßt ou bien aller chez einem 32-Bit-System prinzipiell de 32 Bit aus.

imaginable wäre aussi un BNOT(wert, anzahl), wobei il zweite paramètre plan qui trop berücksichtigene Nombre de Bits contient.

chez den anderen binären Operatoren tritt cela Problem pas sur, là sowohl 0 OU 0, alsauch 0 AND 0 et 0 XOR 0 toujours 0 ergeben. NOT 0 ist mais plan 1.

Salut
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

Nico
Madysa

Bevors dans Vergessenheit gerät: je hatte den Wunsch geäußert, dass waitinput & Co. aussi sur Messages ´weiter untergeordneter la fenêtre reagiert, z.B. RadioButtons, qui einer GroupBox untergeordnet sommes.

Nico Madysa

Michael
Wodrich

oui bien sûr, mais avons wir pas interne sowieso seulement LongInt?

ensuite ist $FFFFFFFF - Wert& oui déjà qui Ideallösung et
LoWord devrait là oui den korrekten partie abknapsen wenns la fois kleiner son soll.

je hatte cela pour qui En-tête-Umsetzung einer Konstanten gebraucht (là était un AND NOT SYNCRONIZE avec drin.

Wird im En-tête eigentlich vom Präprozessor gerechnet? ou bien wird es comme ist transfert?

So cela aus den ganzen OU Orgien simple Konstantenwerte volonté ou bien löst seulement qui Compiler cela sur?

Programmieren, das spannendste Detektivspiel der Welt.