Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht Das deutsche QBasic- und FreeBASIC-Forum
Für euch erreichbar unter qb-forum.de, fb-forum.de und freebasic-forum.de!
 
FAQFAQ   SuchenSuchen   MitgliederlisteMitgliederliste   BenutzergruppenBenutzergruppen  RegistrierenRegistrieren
ProfilProfil   Einloggen, um private Nachrichten zu lesenEinloggen, um private Nachrichten zu lesen   LoginLogin
Zur Begleitseite des Forums / Chat / Impressum
Aktueller Forenpartner:

Array an Sub übergeben

 
Neues Thema eröffnen   Neue Antwort erstellen    Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht -> Allgemeine Fragen zu FreeBASIC.
Vorheriges Thema anzeigen :: Nächstes Thema anzeigen  
Autor Nachricht
oldirty



Anmeldungsdatum: 04.08.2005
Beiträge: 65

BeitragVerfasst am: 22.05.2006, 17:58    Titel: Array an Sub übergeben Antworten mit Zitat

Hallo,

habe folgendes Problem:

Ich möchte die Arrays minimalwert(640) und maximalwert(640) an eine Sub übergeben (z. B. Sub (minimalwert.... , maximalwert....) / declare sub (miniamlwert.... , maximalwert....)
OHNE dim shared minimalwert(640) zu nutzen. (byref damit die Werte auch verändert werden können: sub merkewerte (byref minimalwert()) funktioniert nicht (mit oder ohen werten in Klammern)

Kann mir einer helfen,

vielen Dank im vorraus.

OlDirty

P.S. oder ist dim shared die bessere Wahl?
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden Website dieses Benutzers besuchen
Jojo
alter Rang


Anmeldungsdatum: 12.02.2005
Beiträge: 9736
Wohnort: Neben der Festplatte

BeitragVerfasst am: 22.05.2006, 18:01    Titel: Antworten mit Zitat

ein code, der bei mir immer ufnzt.
(beispiel)

Code:

declare sub printfeld(einname() as integer)

dim feld(1 to 100) as integer

printfeld feld()

sub printfeld(einname() as integer)
    print "erster index:";einname(1)
end sub


_________________
» Die Mathematik wurde geschaffen, um Probleme zu lösen, die es nicht gäbe, wenn die Mathematik nicht erschaffen worden wäre.
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden Website dieses Benutzers besuchen
volta



Anmeldungsdatum: 04.05.2005
Beiträge: 1876
Wohnort: D59192

BeitragVerfasst am: 22.05.2006, 19:23    Titel: Antworten mit Zitat

Hi, ich hoffe ich habe dein Problem richtig begriffen?
Code:
Option Explicit
Dim min(640) As Integer
Dim As Integer i

Sub max (x()As Integer)
Dim As Integer i
 For i = 1 To 640
   x(i)=641-i
 Next
End Sub

For i = 1 To 640
  min(i)=i
Next
?min(1)

max(min())
?min(1)

Sleep
So würde ich das lösen.
Gruß Volta
_________________
Warnung an Choleriker:
Dieser Beitrag kann Spuren von Ironie & Sarkasmus enthalten.
Zu Risiken & Nebenwirkungen fragen Sie Ihren Therapeuten oder Psychiater.
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden Website dieses Benutzers besuchen
oldirty



Anmeldungsdatum: 04.08.2005
Beiträge: 65

BeitragVerfasst am: 22.05.2006, 23:09    Titel: Antworten mit Zitat

Danke für die Antworten, geht.

wusste nicht , dass byref nicht erforderlich ist, werte lassen sich innerhalb der sub trotzdem verändern, so wie ich es vorhabe.
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden Website dieses Benutzers besuchen
Stormy



Anmeldungsdatum: 10.09.2004
Beiträge: 567
Wohnort: Sachsen - wo die schönen Frauen wachsen ;)

BeitragVerfasst am: 22.05.2006, 23:49    Titel: Antworten mit Zitat

Jo, das liegt daran, dass byref standardmäßig verwendet wird.
_________________
+++ QB-City +++ Die virtuelle Stadt für jeden Freelancer - Join the community!
Projekte: QB-City,MysticWorld (RPG), 2D-OpenGL-Tutorial
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden Website dieses Benutzers besuchen
Beiträge der letzten Zeit anzeigen:   
Neues Thema eröffnen   Neue Antwort erstellen    Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht -> Allgemeine Fragen zu FreeBASIC. Alle Zeiten sind GMT + 1 Stunde
Seite 1 von 1

 
Gehe zu:  
Du kannst keine Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum nicht antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.

 Impressum :: Datenschutz