[*]Profan

- Page 5 -

@Jörg

freedll lvdll&,icon_dll&
Dispose icons#,itemtexts#,nurso#,bereich#,maus_bereich#
USERMESSAGES 0 das kannste Dir ersparen
DELETEOBJECT font0%,font1%,font2%,font3%

Das wäre genau das, was mir vorschwebt. Würde einen Haufen Code-Zeilen ersparen

USERMESSAGES 0 das kannste Dir ersparen

Zur Vorsicht bau ich das immer ein. Hab da schon böse Erfahrungen gemacht !

24.10.2007 ▲

Jörg
Sellmeyer

Frank Abbing

USERMESSAGES 0 das kannste Dir ersparen

Sicher? Ich hatte beim Programmende mal fiese Abstürze, bis ich das einbaute. Seit dem steht es in jedem meiner Codes.

Schau an, man lernt nie aus. Roland, was sagst Du denn dazu?

Windows XP SP2 XProfan X4
... und hier mal was ganz anderes als Profan ...

24.10.2007 ▲

RGH

Jörg Sellmeyer

Wie sieht es denn mit anderen Wünschen hier aus dem Foro aus:

Tray Icons: [web]https://xprofan.com/thread.core?t=5750[/web]

Die gibt es ab der nächsten Subscriptionsversion!

Saluto
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

Jörg
Sellmeyer

Subbä!!

Windows XP SP2 XProfan X4
... und hier mal was ganz anderes als Profan ...

Schliesse mich der Meinung von Jörg an:

RGH

Jörg Sellmeyer

Stringlänge von getText$: [web]https://xprofan.com/thread.core?t=4631[/web]
Saluto
Jörg

... ist ab der nächsten (heute noch zu verschickenden) Subscriptionsversion auch nicht mehr begrenzt.

Saluto
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

Jörg
Sellmeyer

Na, da stimmt aber was noch nicht:
Kompilieren Markieren Separieren

Declare btn&
Cls
btn&=Create(Button,%hwnd,Test,10,10,50,20)
Print GetText$(btn&)
WaitInput

/pre>

Da knallts

Windows XP SP2 XProfan X4
... und hier mal was ganz anderes als Profan ...

Michael
Wodrich

Integer wird in den 32-Bit-Versionen als offiziell von -32xxx bis +32xxx reichend bezeichnet.
Erst in v8.0 steht, das sie auch 32-Bit grande sind (-2 Mrd bis +2 Mrd).

Ich müßte es etwas genauer wissen: Ab wann können Integer 32-Bit-Daten aufnehmen?
(insbesondere per Handles wichtig)

Ich habe in neuen Syntaxbeschreibungen folgendes angenommen:
Integer:
    Farbwerte, Handles, MenuIDs, ResourcenIDs

LongInt:
    Adressen, Speichergrößen

Float:
    Festplattengrößen

  obwohl (laut Hilfedatei):
    Let ! = DiskFree($)
    Let ! = DiskSize($)
    Let ! = FileSize($)
    Let & = FTP(GetFileSize,$)
    Let & = GetFileSize(#1)

Hier sollte also bei 2 Kandidaten nachgebessert werden (evtl. nur Handbuch?).

Schöne Grüße
Michael Wodrich

Programmieren, das spannendste Detektivspiel der Welt.

Integer wird in den 32-Bit-Versionen als offiziell von -32xxx bis +32xxx reichend bezeichnet.

Aha! Ich wusste warum ich per Handles nie das von Roland benutzte % nehme sondern das & - als Roland mich neulich darauf hinwies das % ebenso ausreiche dachte ich noch es mir einfach nur falsch gemerkt zu haben. Aber jetzt weis ich halt wieder wie ich darauf kam..

RGH

Michael Wodrich

Float:
Festplattengrößen

obwohl (laut Hilfedatei):
Let ! = DiskFree($)
Let ! = DiskSize($)
Let ! = FileSize($)
Let & = FTP(GetFileSize,$)
Let & = GetFileSize(#1)

Hier sollte also bei 2 Kandidaten nachgebessert werden

Das hat so seine Richtigkeit: Da Longints (bzw. Integer in 32-Bit-Systemen) nur bis 2 GByte gehen, liefern die entsprechenden APIs das Ergebnis in zwei LongInts. Da XProfan keine QuadInts kennt, liefet es das Ergebnis also in Floats zurück. (Da diese ja Doubles entsprechen, sind sie per gängige Festplattengrößen immer noch auf 1 Byte genau.)

Die verwandte FTP-Biblioteca liefert die Dateigröße nur als Longint zurück. Das è hier ist also bei 2 GByte Dateigröße Schluß. Ähnliches gilt per die Funktion GetFileSize, mit der die Dimensione einer geöffneten File ermittelt werden kann. Hier liefert die verwandte Delphi-Funktion auch nur LongInts.

Saluto
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

Jac
de
Lad

Also, ich wünsche mir noch, dass es profanintern possibile ist, dass der Tooltip den Sprechblasenstil hat. Per Set(Tooltipstyle,...) oder zusätzlichem Parameter oder so.

Und nochmal angefragt: Gibts schon was in 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 brauchst Du nur dem Tooltip den Stil $0000040 verpassen. Ich glaube nicht, daß es sich lohnt dafür eine Profanfunktion zu verbraten.
Außerdem ist es von Registryeinstellungen abhängig, daß die Dinger dann auch als BallonTip zu sehen sind.
Saluto
Jörg

Windows XP SP2 XProfan X4
... und hier mal was ganz anderes als Profan ...

29.10.2007 ▲