XProfan

- page 1 -

Hi,

@Frank: es du cela dans deinem Avatar ?
_________________
Salut,
iF

13.05.2004 ▲

Dietmar
Horn

Salut,

@Frank: oui, malheureusement - hab simple un photo de unserer Vereins-HP pris

Dietmar

Multimedia für Jugendliche und junge Erwachsene - MMJ Hoyerswerda e.V. [...]

Windows 95 bis Windows 7
Profan² 6.6 bis XProfan X2 mit XPSE

Das große XProfan-Lehrbuch: [...]

13.05.2004 ▲

Michael
Wodrich

Pourquoi malheureusement???

Mich stört es pas, qui Du beim posten telefonierst.
es arrêt online.

MfG
Michael Wodrich

Programmieren, das spannendste Detektivspiel der Welt.

14.05.2004 ▲

- page 2 -

je hab nochmal ne blöde frage, mais je viens avec qui hilfe fichier des laïques simple pas plus. je versuch im moment cela programmieren de AuswahlBoxen trop apprendre. mais dans qui hilfe fichier sommes aucun beispiele et aus den beispielen kapier je seulement la fois toujours plus que aus dem text en supplément. peux avec jm den source de so einer AuswahlBox donner, aus qui je viel apprendre peux (je benutze qui 5il freewareversion des laïques)?

aussi kapier je cela dans den hilfe dateien nie:

@CreateChoiceBox(N,S,X1,X2,Y1,Y2)
N : Integer - Handle des übergeordneten Fensters
S : String - doit un Leerstring son
X1,Y1 : Integer - Linke obere coin qui AuswahlBox
X2,Y2 : Integer - Taille qui AuswahlBox

Ergebnis : Integer - Handle des erzeugten Objektes

quoi bedeutet qui quatsch? integer

string

??? hää?
kapier je irgendwie pas entier........ wär doch peut-être la fois entier hilfsam, si je wüsste quoi cela trop bedeuten hat, oda?

Rolf
Koch

allô Doik,
nunja Quatsch ist es chez weitem pas.
Siehe trop Deiner Frage avec den Variablen dans Deiner Profanhilfe pour:
7 - Variablen, Konstanten, Datentypen et Typen-Umwandlung

Rolf

[quote-part:5220512242=Doik] je versuch im moment cela programmieren de AuswahlBoxen trop apprendre. mais dans qui hilfe fichier sommes aucun beispiele et aus den beispielen kapier je seulement la fois toujours plus que aus dem text en supplément. [/quote-part:5220512242]
Hilft Dir cela?
Kompilieren Marque Séparation

Def GetSysColor(1) !"User32","GetSysColor"
declare cb1&,cb2&,rb1&,rb2&
window 100,100 - 500,500
cls getsyscolor(15)
let cb1&=createcheckbox(%hwnd,"Test1",10,10,100,20)
let cb2&=createcheckbox(%hwnd,"Test2",10,40,100,20)
let rb1&=createradiobutton(%hwnd,"Test3",120,10,100,20)
let rb2&=createradiobutton(%hwnd,"Test4",120,40,100,20)

while 1

    locate 10,1
    print "Test1-Status:",getcheck(cb1&)
    print "Test2-Status:",getcheck(cb2&)
    print "Test3-Status:",getcheck(rb1&)
    print "Test4-Status:",getcheck(rb2&)
    waitinput

Wend

PS: si cela avec dem DEF sous Profan5 pas klappt, prends simple qui la ligne raus, ensuite mais aussi qui cls getsyscolor la ligne.

iF

Dietmar
Horn

allô Doik,

Variablen sommes Platzhalter pour irgendwelche Werte, qui im Programme mehrfach nécessaire volonté - comparable avec den Variablen chez Gleichungen dans qui mathématique.

Weil différent Werte verschieden viel place im Arbeitsspeicher des PCs besoin, gibt es dans chacun Programmiersprache aussi verschiedene Variabentypen. Aussi ist es pour den Prozessor encore un Unterschied, si il avec den Werten irgendwann dans Deinem Programme aussi la fois le calcul soll (Zahlenwerte), ou bien cet Werte seulement sur dem Bildschirm ausgegeben, bzw. dans Fichiers geschrieben ou bien sur dem Drucker ausgegeben volonté devoir, usw. (Text).

Textes volonté comme String bezeichnet et peut chez Profan² 5.0 pro String-Variable maximum 255 marque long son (chez Profan² ab 7.0 sogar jusqu'à 32 KB).

Unterschieden volonté qui verschiedenen Variablentypen par cela Suffix, welches dem Variablenbezeichner folgt. Pour den Anfang devrait Du avec folgenden Variablentypen dans Deinen ersten Programmen auskommen peut:

String
Beispiel: Text$ - Textes jusqu'à 255 marque

Integer
Beispiel: numéro% - ganze payons im Bereich de - 32768 jusqu'à +32676

LongInteger (ou bien Long)
Beispiel: Zahl& - ganze payons de ca. -2 Milliarden jusqu'à ca. +2 Milliarden

Float
Beispiel: numéro! - Dezimalzahlen bzw. réel payons

avant qui ersten Verwendung dois Du Windows mitteilen, qui Du pour chacun Deiner Variablen Speicherplatz im RAM besoin. ca erfolgt par qui Déclarer-Anweisung.

Beispiel:
Kompilieren Marque Séparation

declare zahl%,zahl&,zahl!,text$

ou bien:
Kompilieren Marque Séparation

declare zahl%
declare zahl&
declare zahl!
declare te

pre>

un Leerstring ist une String-Variable, qui encore keinen Text zugewiesen bekommen hat. Pour dem déclarer sommes alle Variablen seulement la fois vide. le vide Zahlenvariablen (alors integer, longint, float) avons ensuite toujours la valeur 0, chez Stringvariablen ist cela ensuite jeweils qui Wert (steht pour: Sorry - malheureusement ne...aucune Text dans qui Stringvariablen enthalten!).

Handle bedeutet traduit soviel comment Griff. chaque objet, welches Du dans Deinem Programme sur dem Hauptfenster ou bien sur anderen Windows erzeugst, bekommt de Windows interne une Zahlenwert zugewiesen, quel vom Programmierer dans einer LongInt-Variablen gespeichert volonté sollte. qui genaue Zahlenwert eines Handles ist uninteressant, car cette ist sowieso pour chaque Programmstart un anderer.

cela Handle des Hauptfensters Deines Programmes speichert Profan² stets dans qui Système %HWnd. chez anderen Objekten doit on sich comme Programmierer selber tout autor kümmern, avec cela sich cela Programme cet Handle-Zahlenwerte pour später jusqu'à zum Programme-Ende merkt.

Solche Handles sommes important, avec cela on dans seinem Programme puis réagir peux, si qui Anwender z.B. une Button angeklickt hat - ou bien avec cela Windows kapieren peux, si Du une Button sur cela Hauptfenster, ou bien sur irgendein d'autre Dialogfenster dans Deinem Programme mettons vouloir.

Beispiel:
Kompilieren Marque Séparation

declare exit&,ende%
cls
let exit& = CreateButton(%HWnd,"Beenden",10,10,80,25)

whilenot ende%

    WaitInput

    if GetFocus(exit&)

        let ende% = 1

    endif

wend

end

Im Beispiel wird cela Handle des Buttons dans qui LongInt-Variablen exit& gespeichert. si qui Anwender cela objet avec dem Handle exit& angeklickt hat (il es alors aktiviert bzw. den Concentrer puis gesetzt hat), ensuite wird qui Variable ende% sur une Wert ungleich zéro gesetzt, avec cela qui Tandis que-Boucle sortir de et cela Programme finissez volonté peux. ici dient alors qui GetFocus-Anweisung en supplément herauszubekommen, si qui Anwender sur den finissons-Button geklickert hat, ou bien pas.

si sur dem Button ne...aucune Test stehen soll, ensuite sagt on aussi : qui CreateButton-Anweisung est un Leerstring trop transfert.

Beispiel:
Kompilieren Marque Séparation

let exit& = CreateButton(%HWnd,»,10,10,80,25)

Salut
Dietmar

Multimedia für Jugendliche und junge Erwachsene - MMJ Hoyerswerda e.V. [...]

Windows 95 bis Windows 7
Profan² 6.6 bis XProfan X2 mit XPSE

Das große XProfan-Lehrbuch: [...]

so erstmal thx à euch.

@si: c'est aucun auswahlbox! une auswahlbox wir avec diesem befehl erzeugt:

@CreateChoiceBox(N,S,X1,X2,Y1,Y2)

allerdings versteh je pas droite, wieso qui chez mir nie so un ding erzeugt, si je sur run drücke. dans qui hilfe fichier steht, dass là encore plus eingegeben volonté muss. je werd seulement malheureusement absolu pas malain aus qui hilfe fichier. et un richtiges beispiel ist là aucn pas vorhanden. deswegen frag je oui pour einem source pour une funktionierende auswahlbox, avec cela je sais, quoi je faux fais et changement muss.
si es euch intéressé, que voici steht dans qui hilfe fichier dans profan le auwahlboxen:

@CreateChoiceBox
@GetText$
@MoveListToChoice, @AddChoice

une Auswahlbox ist une Sonderform qui sogenannten Combobox: par Anklicken des Pfeiles pour unten peux aus einer liste de Auswahlmöglichkeiten une la ligne ausgewählt volonté. une Eingabe de Zeilen ist pas possible. une Auswahlbox ist dans PROFANE² toujours alphabetisch sortiert.

avec qui Funktion @ADDCHOICE peux qui Auswahlbox un Eintrag hinzugefügt volonté. avec @MOVELISTTOCHOICE wird qui komplette ListBox-liste, qui z.B. zuvor avec ADDFONTS, ADDFILES ou bien ADDWINDOWS pleine wurde, qui Auswahlbox hinzugefügt.

avec @DELETECHOICE:fdeletechoice] peux un Eintrag aus qui Auswahlbox entfernt volonté.

qui ausgewählte la ligne peux avec qui Funktion @GETTEXT$ ermittelt volonté.

Im Zusammenhang avec AuswahlBoxen sommes qui AuswahlBox-Messages intéressant. So peux zum Beispiel avec cb_Dir une Verzeichnis-/Laufwerksliste erzeugt volonté ou bien avec cb_ResetContent qui le contenu einer AuswahlBox gelöscht volonté. avec cb_SetCurSel peux un bestimmter Eintrag vorausgewählt volonté. qui Messages volonté avec @SendMessage à qui betreffende ListBox gesandt.

ACHTUNG: qui ici beschriebenen Funktionen sommes seulement sur AuswahlBoxen anzuwenden! Werden vous sur autre Steuerelemente (z.B. ListBoxen) angewandt liefern vous unerwartete Ergebnisse et peut dans einigen Fällen aussi Windows ou bien qui Anwendung zum Absturz apporter! qui Befehl SETTEXT ist aucunement sur une AuswahlBox anzuwenden!

SELBSTDEFINIERTE DIALOGE
INHALT
REFERENZ

Doik

16.05.2004 ▲

Rolf
Koch

Hi Doik,

scheinbar la hâte Du encore pas den Object Creator de mir.
si Du cette runtergeladen la hâte, führe cette aus et erstelle un nouveau la fenêtre, lege une Choicebox sur elle et drücke sur Vorschau (Lupe).
eh bien vois Du den erzeugten Voir le texte source.
comment Si Schonmal sagte: Aus Roc peux on sogar apprendre.

Rolf

16.05.2004 ▲