| |
|
|
- page 1 - |
|
| cela Trackmenu - si je mich droite erinnere - était qui Procédure toujours seulement brauchbar solange on sur dem hwnd arbeitet, simple à cause de qui Positionsangabe.
mon Vorschlag, si Trackmenu aucun paramètre bekommt, ensuite cela Trackmenu à Mausposition erstellen.
Mittlerweile J'ai eu mir hierfür une Proc geschrieben, mais mich oui quand même Jahrelang gequält (P²4.5=>P7) et avec cela sich autre pas ebenso tracasser... KompilierenMarqueSéparation
Proc Trackmenu_bymousepos
Declare Gmp#,Dx&,Dy&
Dim Gmp#,8
External("user32","ClientToScreen",%Hwnd,Gmp#)
Dx&=Long(Gmp#,0)
Dy&=Long(Gmp#,4)
External("user32","GetCursorPos",Gmp#)
Trackmenu (Long(Gmp#,0)-Dx&),(Long(Gmp#,4)-Dy&)
Dispose Gmp#
oc
|
|
|
| |
|
|
| |
|
- page 5 - |
|
|
| @Jörg
freedll lvdll&,icon_dll& Dispose icons#,itemtexts#,nurso#,bereich#,maus_bereich# USERMESSAGES 0 cela kannste Dir ersparen DELETEOBJECT font0%,font1%,font2%,font3%
cela wäre oui c'est ca cela, quoi mir vorschwebt. Würde une Haufen Code-Zeilen ersparen
USERMESSAGES 0 cela kannste Dir ersparen
Zur attention bau je cela toujours un. Hab là déjà böse Erfahrungen gemacht ! |
|
|
| |
|
|
|
Jörg Sellmeyer | Frank Abbing
Frank AbbingUSERMESSAGES 0 cela kannste Dir ersparen sûrement? je hatte beim Programmende la fois fiese Abstürze, jusqu'à je cela einbaute. depuis dem steht es dans chaque meiner Codes.
exposition à, on lernt nie aus. Roland, quoi sagst Du car en supplément? |
|
|
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 24.10.2007 ▲ |
|
|
|
|
RGH | Jörg Sellmeyer
comment sieht es car avec anderen désirer ici aus dem Forum aus: Tray Icônes: [web]https://XProfan.com/thread.core?t=5750[/web]
qui gibt es ab qui prochain Subscriptionsversion!
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 | 25.10.2007 ▲ |
|
|
|
|
Jörg Sellmeyer | |
|
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 25.10.2007 ▲ |
|
|
|
|
| Schliesse mich qui attitude de Jörg à: |
|
|
| |
|
|
|
RGH | Jörg Sellmeyer
Stringlänge de getText$: [web]https://XProfan.com/thread.core?t=4631[/web] Salut Jörg
... ist ab qui prochain (aujourd'hui encore trop verschickenden) Subscriptionsversion aussi pas plus begrenzt.
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 | 25.10.2007 ▲ |
|
|
|
|
Jörg Sellmeyer | |
|
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 26.10.2007 ▲ |
|
|
|
|
Michael Wodrich | Integer wird dans den 32-Bit-Versionen comme officiel de -32xxx jusqu'à +32xxx reichend bezeichnet. seulement dans v8.0 steht, cela vous aussi 32-Bit grand sommes (-2 Mrd jusqu'à +2 Mrd).
je devrait es quelque chose genauer savons: Ab quand peut Integer 32-Bit-données aufnehmen? (insbesondere pour Handles important)
j'ai dans neuen Syntaxbeschreibungen folgendes angenommen: Integer: Farbwerte, Handles, MenuIDs, ResourcenIDs
LongInt: Adressen, Speichergrößen
Float: Festplattengrößen
obwohl (le son Hilfedatei): Let ! = DiskFree($) Let ! = DiskSize($) Let ! = FileSize($) Let & = FTP(GetFileSize,$) Let & = GetFileSize(#1)
ici sollte alors chez 2 Kandidaten nachgebessert volonté (peut-être. seulement Handbuch?).
belle Grüße Michael Wodrich |
|
|
| Programmieren, das spannendste Detektivspiel der Welt. | 26.10.2007 ▲ |
|
|
|
|
|
Integer wird dans den 32-Bit-Versionen comme officiel de -32xxx jusqu'à +32xxx reichend bezeichnet.
Aha! je wusste pourquoi je pour Handles nie cela de Roland benutzte % nehme mais cela & - comme Roland mich dernièrement puis hinwies cela % ebenso ausreiche dachte je encore es mir simple seulement faux gemerkt trop avons. mais maintenant weis je arrêt wieder comment je puis kam.. |
|
|
| |
|
|
|
RGH | Michael Wodrich
Float: Festplattengrößen
quoique (le son Hilfedatei): Laisser ! = DiskFree($) Laisser ! = DiskSize($) Laisser ! = FileSize($) Laisser & = FTP(GetFileSize,$) Laisser & = GetFileSize(#1)
ici sollte alors chez 2 Kandidaten nachgebessert volonté
cela hat so sa Richtigkeit: là Longints (bzw. Integer dans 32-Bit-Systemen) seulement jusqu'à 2 GByte aller, liefern qui entsprechenden APIs cela Ergebnis dans deux LongInts. là XProfan aucun QuadInts kennt, liefet es cela Ergebnis alors dans Floats zurück. (là cet oui Doubles entsprechen, vous êtes pour gängige Festplattengrößen toujours sur 1 Byte oui c'est ca.)
qui verwandte FTP-Bibliothèque liefert qui Dateigröße seulement comme Longint zurück. cela est ici ist alors chez 2 GByte Dateigröße Schluß. Ähnliches gilt pour qui Funktion GetFileSize, avec qui qui Taille einer geöffneten Dossier ermittelt volonté peux. ici liefert qui verwandte Delphi-Funktion aussi seulement LongInts.
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 | 26.10.2007 ▲ |
|
|
|
|
Jac de Lad | alors, je wünsche mir encore, dass es profanintern possible ist, dass qui Tooltip den Sprechblasenstil hat. Per Set(Tooltipstyle,...) ou bien zusätzlichem paramètre ou bien so.
et nochmal angefragt: Gibts déjà quoi dans direction XPDL? |
|
|
| 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 | 29.10.2007 ▲ |
|
|
|
|
Jörg Sellmeyer | Pour cette brauchst Du seulement dem Tooltip den Stil $0000040 verpassen. je crois pas, qui es sich lohnt pour une Profanfunktion trop verbraten. Aussi ist es de Registryeinstellungen dépendant, qui qui Dinger ensuite aussi comme BallonTip trop voyons sommes. Salut Jörg |
|
|
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 29.10.2007 ▲ |
|
|
|