| |
|
|
- page 1 - |
|
![Klaus Müller: 22.05.2008](.././../../i/a/5719242914ac8e0e0a323c.gif) Klaus Müller | toujours si Je l' Aufruf qui Proc avec einem Handle belegen veux erzählt mir Profan dass cela aucun numéro ist et bringt mir cela Static pas sur den Bildschirm. Lass je allerdings qui Handle-Zuweisung weg volonté qui Static entier normal gezeichnet. KompilierenMarqueSéparationDeclare A&, B&, C&
DEF SetWindowLong(3) !USER32,SetWindowLongA
DEF GetWindowLong(2) !USER32,GetWindowLongA
Cls
Print Taste drücken
Proc CreateStaticEx
Parameters t$,x%,y%,x1%,y1%,border%,alignment%
Declare h&,xstyle%
Let h&=CreateText(%hwnd,t$,0,0,0,0)
let xstyle%=1
Case border%:Let xstyle%=$200
SetWindowLong(h&,-20,xstyle%)
SetWindowLong(h&,-16,Or(GetWindowLong(h&,-16),alignment%))
SetWindowPos h&=x%,y%-x1%,y1%
Return h&
EndProc
A& = CreateStaticEx A,10,30,200,100,1,0 Fehlermeldung: Keine Zahl: CreateStaticEx
B& = CreateStaticEx B,10,130,200,100,1,0 Fehlermeldung: Keine Zahl: CreateStaticEx
C& = CreateStaticEx C,10,230,200,100,1,0 Fehlermeldung: Keine Zahl: CreateStaticEx
WaitInput
Fin
|
|
|
| XProfan X4; Win10 x64 Der Kuchen ist eine lüge! | 22.05.2008 ▲ |
|
|
|
|
| |
|
- page 1 - |
|
![Jörg Sellmeyer: 22.05.2008](.././../../i/a/8132362004294faafc5e8c.jpg) Jörg Sellmeyer | là Thomas 8.0 hat doit il es glaube je encore comme Procédure et pas comme Funktionsaufruf faire, ou bien? So ca va ensuite mais: KompilierenMarqueSéparation |
|
|
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... ![](https://www.wuestensand.info/images/CoverFataMorganaklein.jpg) | 22.05.2008 ▲ |
|
|
|
|
![Dietmar Horn: 22.05.2008](.././../../i/a/117578995746ba3f2fc30ad.jpg) Dietmar Horn | Stimmt, Thomas hat jusqu'à maintenant seulement 8.0a. Doch chez 8.0 klappt cela déjà avec dem Aufrufen einer Proc comme Funktion.
Salut Dietmar |
|
|
| Multimedia für Jugendliche und junge Erwachsene - MMJ Hoyerswerda e.V. [...] ![](/intl/i/lnk.gif) Windows 95 bis Windows 7 Profan² 6.6 bis XProfan X2 mit XPSE Das große XProfan-Lehrbuch: [...] ![](/intl/i/lnk.gif) | 22.05.2008 ▲ |
|
|
|
|
![Paul Glatz: 22.05.2008](.././../../i/a/916.gif) Paul Glatz | |
|
| |
|
|
|
![iF: 22.05.2008](.././../../i/a/1.gif) | Echte Funktionen gingen doch sogar déjà avant XProfan! |
|
|
| |
|
|
|
![Dietmar Horn: 22.05.2008](.././../../i/a/117578995746ba3f2fc30ad.jpg) Dietmar Horn | entier oui c'est ca, mon Lieblings-Krümel! : qui Thomas hat wirklich je n'en sais rien! Pour cette übe je avec Dir demain wieder la fois kostenlos un paire Runden Langsamgehen durchs Computerkabinett. ![](.././../../i/s/crazy.gif)
alors wirklich, Thomas ... Quelque chose comme la hâte Du wirklich pas gewußt? Schäme toi pour et lieu toi seulement la fois ne Runde dans qui coin! ![](.././../../i/s/_n_red_smile.gif)
alors zukünftig chez Problemen avec XProfan (ou bien avec DOS) s'il te plaît absolument seulement la fois unseren Krümel-Pauli fragen, ensuite lernste cela Programmieren entier, entier vite. ![](.././../../i/s/loldev.gif)
Salut Dietmar
Je mets mir justement avant, quoi cela demain soir pour un Bild ergibt, si unser Krümel comme Neunjähriger pour justement la fois einem Dreivierteljahr XProfan-Kurs einem achtzehnjährigen, presque fertig ausgebildeten informatique-Assistenten avec mehreren Jahren XProfan-Erfahrung cela Programmieren beibringen wird ... ![](.././../../i/s/superlol.gif) |
|
|
| Multimedia für Jugendliche und junge Erwachsene - MMJ Hoyerswerda e.V. [...] ![](/intl/i/lnk.gif) Windows 95 bis Windows 7 Profan² 6.6 bis XProfan X2 mit XPSE Das große XProfan-Lehrbuch: [...] ![](/intl/i/lnk.gif) | 22.05.2008 ▲ |
|
|
|
|
![Paul Glatz: 22.05.2008](.././../../i/a/916.gif) Paul Glatz | Denau Dietmar cela Langsamgehen mais est toujours kostenlos ou bien? Paul |
|
|
| |
|
|
|
![iF: 22.05.2008](.././../../i/a/1.gif) | Paul Glatz
Denau Dietmar cela Langsamgehen mais est toujours kostenlos ou bien? Paul
définitif pas toujours! ![](.././../../i/s/__upl_ext_1111498515.gif) |
|
|
| |
|
|
|
![Paul Glatz: 22.05.2008](.././../../i/a/916.gif) Paul Glatz | |
|
| |
|
|
|
![Dietmar Horn: 22.05.2008](.././../../i/a/117578995746ba3f2fc30ad.jpg) Dietmar Horn | Tja, Paul - c'est ça malheureusement seulement zum partie! ![](.././../../i/s/eusa_think.gif)
cela Langsamgehen bleibt zwar kostenlos, mais cela Rennen et dabei quieken im Computerkabinett wird bientôt pro angefangener Runde entweder une Euro coûter (ensuite wirst Du encore un Weilchen länger sur XProfan 11 sparen doit) - ou bien tu dois den Großen anstelle chaque Rennrunden-Euros une de Deinen Plüschis livrer (quoi qui ensuite avec cela anstellen, cela wirst Du Dir sicherlich penser peut ... -> *mord* *mord* *mord*).
cela Langsamgehen-apprendre bzw. -enseigner par mich, wird bientôt également pas plus kostenlos son (aussi 1 Euro pro Runde).
tu as alors entier démocratique qui freie l'élection entre pas-Langsamgehen-apprendre ou bien bientôt XProfan 11 achetons dürfen. une de beiden allez seulement ... (Mehrfachauswahl% = 0) ![](.././../../i/s/__upl_ext_1111498442.gif)
Salut Dietmar |
|
|
| Multimedia für Jugendliche und junge Erwachsene - MMJ Hoyerswerda e.V. [...] ![](/intl/i/lnk.gif) Windows 95 bis Windows 7 Profan² 6.6 bis XProfan X2 mit XPSE Das große XProfan-Lehrbuch: [...] ![](/intl/i/lnk.gif) | 22.05.2008 ▲ |
|
|
|
| |
|
- page 2 - |
|
|
![: 22.05.2008](.././../../i/a/noavatar.gif) | qui arme Paul - ![](.././../../i/s/-cry.png) |
|
|
| |
|
|
|
![Klaus Müller: 23.05.2008](.././../../i/a/5719242914ac8e0e0a323c.gif) Klaus Müller | Relatif à la Funktionsaufruf hat wunderbar geklapt. merci ensuite la fois! à quelque chose comme hät je aussi selbst penser peut. suis à cause de qui anstehenden Prüfung prochain semaine, un peu Betriebsblind geworden. ![](.././../../i/s/dead.gif)
Salut Thomas |
|
|
| XProfan X4; Win10 x64 Der Kuchen ist eine lüge! | 23.05.2008 ▲ |
|
|
|
|
![Paul Glatz: 23.05.2008](.././../../i/a/916.gif) Paul Glatz | Horst Horn
qui arme Paul - ![](.././../../i/s/-cry.png)
enfin hat quelqu'un avec mir mitleid
Paul |
|
|
| |
|
|