| |
| |
|
| - Página 1 - |
|
 | Das Trackmenu  - si yo mich bastante erinnere - war el Procedimiento siempre sólo brauchbar solange uno en el hwnd arbeitet, simplemente wegen el Positionsangabe.
Mein Vorschlag, si Trackmenu no Parámetro bekommt, entonces el Trackmenu a Mausposition redactar.
Mittlerweile Tuve me esta una Proc geschrieben, aber mich sí trotzdem Jahrelang gequält (P²4.5=>P7) y así se otro no ebenso quälen...
KompilierenMarcaSeparación
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
|
|
| |
| |
| |
|
|
| |
| |
| - Página 5 - |
|
RGH | Michael Wodrich
Float:
Festplattengrößen
obwohl (laut Hilfedatei):
Let ! = DiskFree($)
Let ! = DiskSize($)
Let ! = FileSize($)
Let & = FTP(GetFileSize,$)
Let & = GetFileSize(#1)
Hier debería also en 2 Kandidaten nachgebessert voluntad
Das ha así seine Richtigkeit: Como Longints (o. Integer en 32-Bit-Systemen) sólo a 2 GByte ir, liefern el entsprechenden APIs el Ergebnis en zwei LongInts. Como XProfan no QuadInts sabe, liefet lo el Ergebnis also en Floats zurück. (Como esta sí Doubles entsprechen, son ellos para gängige Festplattengrößen siempre todavía en 1 Byte genau.)
El verwandte FTP-Biblioteca liefert el Dateigröße sólo como Longint zurück. Das heißt hier es also en 2 GByte Dateigröße Schluß. Ähnliches gilt para el Función GetFileSize, con el el Größe uno geöffneten Expediente ermittelt voluntad kann. Hier liefert el verwandte Delphi-Función auch sólo LongInts.
Saludo
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 | Also, Yo wünsche me todavía, dass lo profanintern posible es, dass el Tooltip el Sprechblasenstil ha. Per Conjunto(Tooltipstyle,...) oder zusätzlichem Parámetro más o menos.
Und otra vez angefragt: Gibts ya qué en Richtung 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 | Dafür Usted necesita sólo el Tooltip el Stil $0000040 verpassen. Yo glaube no, daß lo lohnt dafür una Profanfunktion a verbraten.
Außerdem es de Registryeinstellungen abhängig, daß el Dinger entonces auch como BallonTip a sehen son.
Saludo
Jörg |
|
| |
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ...  | 29.10.2007 ▲ |
|
| |
|
| |
| |
| - Página 6 - |
|
|
Jac
de
Lad | | Jaja, el weiß Yo, aber profanintern wärs me eben más bien. Besser como nachträglich el Tooltip otra vez a ändern. |
|
| |
| 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 ▲ |
|
| |
|
|
| | Nun el wäre aber zumindest una Macro - also poste lo en el Codesnippets así mans findet si mans braucht. (PS Codesnippets son a XIDE angebunden - o. andersherum) |
|
| |
| |
| |
|
|
Jörg
Sellmeyer | |
| |
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 29.10.2007 ▲ |
|
| |
|
|
| Nice  |
|
| |
| |
| |
|
|
Jac
de
Lad | Ok, ok, Yo geb en. 
Wer mi Programas sabe, weiß, dass Yo alles Tooltips como Sprechblasen mache, deshalb el Cuestión.
Nächstes Thema: Yo wünsche me una DeleteListBoxItem para el interne Listboxliste. |
|
| |
| 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 ▲ |
|
| |
|
|
Dieter
Zornow | Sí el wäre una wichtige Función el en Profano fehlt y de me ebenfalls oft vermisst se.
Viele Grüße de Bangkok
Dieter |
|
| |
| Er ist ein Mann wie ein Baum. Sie nennen ihn Bonsai., Win 7 32 bit und Win 7 64 bit, mit XProfan X2 | 29.10.2007 ▲ |
|
| |
|
|
| | Wohl verdadero! Klar puede ser se esta qué propio escribir, aber entonces haben wir otra vez no-native Schleifen en el Einsatz. Yo sería incluso una Schritt más ir y me una push y pop para el interne ListboxListe wünschen - also no sólo para el Einträge pero auch para el komplette Liste! (simplemente para Roland a realisieren aber mein Gefühl sagt me él Será mejor que te va desafortunadamente net hacer obwohl uno así muy muy muy bien con Daten jonglieren podría) |
|
| |
| |
| |
|
|
Jörg
Sellmeyer | | In el Rahmen möchte Yo auch todavía una InsertString() para el Liste anregen. |
|
| |
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 29.10.2007 ▲ |
|
| |
|
(944)
Deutsch
English
Français
Español
Italia