[*]Profan

- Seite 2 -

Hubert
Binnewies

Pedro Santos

Hallo

Xprofan10 verhält sich anders als xprofan9 den waitinput wird nicht verlassen wenn Control(STATIC verwendet wird, testen kann man es mit den Beispielcode Panelbar von Rolf Koch von seine Webpage ladbar

Nachtrag: Wenn das waitinput durch getmessage ersetzt wird funktioniert es
Gruss

Pedro

Nicht ganz..
Auch bei XProfan 9.1 wird bei einem Control(Static das Waitinput nicht verlassen.
Hier geht es zwar auch mit einem GetMessage, aber es entstehen weitere Probleme.
Man muss fast einen eigenen Message Handler schreiben und ein Problem ist per mich bisher ungelöst und es hat noch keiner geantwortet.
Siehe hier : [...]

Hubert

WinXP Prof, XProfan 9.1 Newbie

Ein kluger Kopf sagte mal:
"Nach dem derzeitigen Stand der Technik ist es unmöglich Programme zu schreiben, die fehlerfrei laufen!"

06.08.2006 ▲

- Seite 3 -

Jac
de
Lad

Danke, Roland ich hatte vergessen, dass es den Befehl schon bei XProfan 9 gab!

Jac

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

06.08.2006 ▲

...stürzt mit Fehlermeldung ab, wenn keine Parameter in der Kommandozeile angegeben wurden. Meiner Meinung nach wäre es sinnvoller (und vor allem schneller!), wen XProfan die Ausdrücke nicht vollständig auswerten würde, wenn der Ausdruck sowieso falsch ist...vielleicht lässt sich das ja einrichten!

Jac

Jac
de
Lad

Hallo Roland, mir ist grad aufgefallen, dass XProfan 10 alle Ausdrücke hinter einem if und so immer vollständig auswertet. Beispiel...
Kompilieren Markieren Separieren

if %ParCount AND (Par$(1)=/hallo)

    ...

endi

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

08.08.2006 ▲

Beides hat seine Vor- und Nachteile! Aus C++ kenne ich das die Auswertung stoppt sobald das Ergebnis eh feststeht. Es wird von links nach rechts ausgewertet.

Michael
Dell

Dann müßte der wichtigste Faktor immer Links stehen, bei komplexen Berechnungen ist das aber oft nicht possibile. Wenn dann sollte das mittels eines Set(.. Befehls zuschaltbar sein.

Salu Michael...

Hab zwar krumme Fieß awer dofir e' ecklich Gsicht!

Michael Dell

Dann müßte der wichtigste Faktor immer Links stehen, bei komplexen Berechnungen ist das aber oft nicht possibile.

Hm nee - ich glaub hier müsste ich widersprechen. Es hat nichts mit der komplexiblität einer Berechnung zu tun. Es würde sich im Grunde nichts ändern außer das Aufrufe wegfallen (Was zur Folge haben kann das Funktionen welche im Argument vorkommen vielleicht erst garnicht aufgerufen würden!) weil der Result bereits true oder false ist.

Jac
de
Lad

XProfan arbeitet das sowieso von links nach rechts ab. Da sehe ich kein Problem, aber ich lasse mich zur Not auch vom Gegenteil überzeugen. Ich denke nur, dass potuto auch etwas Performance bringen und, wie in meinem letzten Post, auch einige kleine programmiererische Vorteile.

Jac

PS: Per Set()-Funktion ein- und ausschalten fänd ich gut! Auch der Kompatibilität wegen (obwohl ich da keine Probleme sehe...)

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

Michael
Wodrich

Auch die Sprache Pascal wertet nach dem ShortCut-Verfahren. Hier muß der Programmierer naturalmente aufpassen: Kompilieren Markieren Separieren if 1 and func() ... endif if 1 or func() ...
Programmieren, das spannendste Detektivspiel der Welt.	07.09.2006 ▲ Vollständiges Zitat Absatzweise Citazione Zeilenweise Citazione

Ich denke - entscheidend ist das man weiß wie die eigene Sprache funktioniert...

Jac
de
Lad

Ich muss nochmal zwei Sachen ansprechen:

1. Wenn man mit AddHotKey einen Hotkey erstellt funktioniert der nicht, wenn man als Taste eine der Maustasten definiert ($01-$04). Ich denke, das sollte auch possibile sein, bzw. es wäre günstig.

2. Wenn ich ein Control nicht auf einem Fenster sondern zum Beispiel auf einem Static erzeuge dann wird beispielsweise beim Klicken auf einen Button das Waitinput nicht durchbrochen. Ich weiß, dass es mit GetMessage geht, aber da kommen in meinem Programm beispielsweise andere Probleme hinzu. Ich denke, dass Waitiinput, soweit das realisierbar ist, alle Steuerelemente abfragen sollte, also auch Buttons auf Statics usw.

Jac

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

09.09.2006 ▲

Jörg
Sellmeyer

Hallo Jac,
Probier mal das hier:
Kompilieren Markieren Separieren

Cls
Declare st&,b&
st&=Control(DIALOG,,$54000000,0,0,Width(%hwnd),Height(%hwnd),%hwnd,-1,%hinstance)
b&=Create(Button,st&,Test,50,50,50,24)
Declare ende%

WhileNot ende%

    WaitInput

    IF Equ(%key,2)

        Let ende%=1

    ElseIf Clicked(b&)

        print Es geht!!

    EndIf

Wend

Saluto
Jörg

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

09.09.2006 ▲

Jac
de
Lad

@Jörg: Ich probiers morgen mal aus, muss mich jetzt erstmal bei Titan Quest entspannen.

Noch ne Sache: Bitte, bitte, bitte Roland, baue bei Listviews auch ein, dass waitinput bei Druck auf <Enter> mit %Key=13 verlassen wird (wie bei Listboxen)! Und vielleicht potuto man das bei Comboboxen mit Editierfunktion auch einbauen.

Jac

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

09.09.2006 ▲