XProfan

Français

Hubert
Binnewies

allô zusammen..

Kleines Problem..
je serait mir volontiers un paire Funktionen écrivons qui mir cela Programmieren à meinem derzeitigen projet simplifier.
cela Blöde ist seulement le moi dans den meisten Funktionen plusieurs Rückgabewerte habe.

je hab qui Aider dans Xprofan par et toujours seulement gesehen cela on avec RETOUR seulement une Wert zurück donner peux.

ou bien hab je là quoi übersehen?

comment peux je plusieurs Werte zurückgeben?

merci Schonmal d'avance.

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!"

15.09.2006 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

- page 1 -

Hab ici encore un Beispiel, sans jegliche globale Variable. Simuliertes byRef

Kompilieren Marque Séparation

Struct Long = l&

Proc Test1

    parameters a1&, a2&
    Declare B#
    Dim B#, Long
    B# = a1&
    B#.l& = 50  50 in c& von Test2 schreiben
    B# = a2&
    B#.l& = 100  100 in d& von Test2 schreiben
    Dispose B#  lokale Bereichsvariable wird nicht mehr gebraucht

EndProc

Proc Test2

    Declare c&, d&
    Test1 Addr(c&), Addr(d&)
    print "Wert von c& = " + Str$(c&) + "  d& = " + Str$(d&) + " in der Proc"

EndProc

Declare c&, d&
cls
Test2
Print
Print "Globales c& = " + Str$(c&) + "  Globales d& = " + Str$(d&) + " wurden nicht verändert!"
waitkey

Proc Test2 sur gibt den Pointer de c& et d& à Proc Test1, quelle là 50 et 100 comme Rückgabe einträgt. comment on vois, aucun globalen Variablen et qui Bereich wird aussi juste disposed

Hoffe la fois, cela peux quelqu'un gebrauchen

// Nachtrag:
hab den Code et avec ca erweitert, avec cela on voit, cela es wirklich allez

ici nochmal sans Hilfsstructur, hab je garnicht tour gedacht, cela es dans Profan aussi so allez:
Kompilieren Marque Séparation

Proc Test1

    parameters a1&, a2&
    Déclarer B#
    Faible B#,4
    B# = a1&
    Long B#,0 = 50  50 dans c& de Test2 écrivons
    B# = a2&
    Long B#,0 = 100  100 dans d& de Test2 écrivons
    Dispose B#  lokale Bereichsvariable wird pas plus gebraucht

ENDPROC

Proc Test2

    Déclarer c&, d&
    Test1 Addr(c&), Addr(d&)
    imprimer "Wert de c& = " + Str$(c&) + "  d& = " + Str$(d&) + " dans qui Proc"

ENDPROC

Déclarer c&, d&
c& = 1
d& = 1
cls
Test2
Imprimer
Imprimer "Globales c& = " + Str$(c&) + "  Globales d& = " + Str$(d&) + " wurden pas modifié!"
waitkey

Ist peut-être verständlicher

15.09.2006 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

Weils so joli ist, encore qui einfachste variante (hab avec cela malheureusement bisher trop wenig gemacht

)
Kompilieren Marque Séparation

Proc Test1

    parameters a1&, a2&
    Long a1&,0 = 50
    Long a2&,0 = 100

EndProc

Proc Test2

    Declare c&, d&
    Test1 Addr(c&), Addr(d&)
    print "Wert von c& = " + Str$(c&) + "  d& = " + Str$(d&) + " in der Proc"

EndProc

Declare c&, d&
c& = 1
d& = 1
cls
Test2
Print
Print "Globales c& = " + Str$(c&) + "  Globales d& = " + Str$(d&) + " wurden nicht verändert!"
waitkey

15.09.2006 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

Ähem - Du änderst doch nix plus comme la valeur de globalen Variablen - et cela aussi encore compliqué.

15.09.2006 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

[quote-part:a6584bda33=iF]Ähem - Du änderst doch nix plus comme la valeur de globalen Variablen - et cela aussi encore compliqué.

[/quote-part:a6584bda33]
qui Variablen dans beiden Proc sommes bistrot, Proc Test1 ändert qui Variablen de Test2, Gleichnamige Globale Variablen rester aussi conservé. Funktioniert so allerdings pas avec Cordes. Globale Variablen volonté pas geändert

je übergebe den Pointer et fais une profanischen Poke

15.09.2006 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

Ne quatsch - Du deklarierst deux Globale - qui änderst Du dans qui Proc - plus pas. Dein Code allez pas sans Globals qui Du utilise.

ou bien stehe je aufm Schlauch?

15.09.2006 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

[quote-part:869f8d550b=iF]Ne quatsch - Du deklarierst deux Globale - qui änderst Du dans qui Proc - plus pas. Dein Code allez pas sans Globals qui Du utilise.

ou bien stehe je aufm Schlauch?

[/quote-part:869f8d550b]
chez mir gehts::
Kompilieren Marque Séparation

Proc Test1

    parameters a1&, a2&
    Long a1&,0 = 50
    Long a2&,0 = 100

EndProc

Proc Test2

    Declare c&, d&
    Test1 Addr(c&), Addr(d&)
    print "Wert von c& = " + Str$(c&) + "  d& = " + Str$(d&)

EndProc

Test2

15.09.2006 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

ah maintenant! bien sûr! Hab cela Déclarer dans qui zweiten Proc übersehen!

Thomas veux dire, simple qui Adressen qui Variablen à une Proc transfert, et qui Variableninhalte per Long changement.

15.09.2006 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

Hubert
Binnewies

ööööööhmmmmmm.....

et si je aucun numerischen Werte mais Cordes habe??

(pas mal qui Solution, peux je gebrauchen)

Salut 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!"

15.09.2006 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

Rolf
Koch

seulement zur Erweiterung:
depuis Ewigkeiten schlummert sous eigene Codes folgenders sur meiner page
plus comme une paramètre aus einer Procédure zurückliefern - récente (19.03.2003)

on sollte aussi la fois sur meiner page kucken *lol*

15.09.2006 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

- page 2 -

Frank
Abbing

[quote-part:caee46f7de]et si je aucun numerischen Werte mais Cordes habe??[/quote-part:caee46f7de]
mets du aiguille sur Cordes.
qui Listview.dll benutzt déjà depuis long Zeit pour quelques Funktionen qui technologie, qui Thomas gepost hat. Addressen de Variablen comme paramètre. Allerhand APIs faire es genauso, z.B. OpenGL-APIs.

15.09.2006 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

je denke la fois pour longs ist cela avec den Pointern déjà Ideal, pour strings ist cela nachträglich auseinandernehmen, so comment sur Rolf seiner page, bzw. de Roland angesprochen qui einfachste Weg.

je personnelle mag nämlich pas allzu volontiers zuviele globale Variablen, avant allem dans grösseren Projekten ist cela quelquefois verhängnisvoll

mais im Endeffekt, zählt qui Erfolg

15.09.2006 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

Frank
Abbing

Richtig. je denke aussi, pour Textes sommes Bereiche/Strukturen am besten approprié.

15.09.2006 ▲

Vollständiges citation

Absatzweise Citation Zeilenweise Citation

◄