Autor Thema: Vergleiche  (Gelesen 2052 mal)

Offline Michael84

  • Frischling
  • *
  • Beiträge: 49
Vergleiche
« am: 22.12.05 - 10:41:17 »
Ich würde gerne list_neu[1] mit list_hidden[1] vergleichen und dann anhand des prompt ausgeben ob es gleich ist oder nicht..doch leider muss ich wohl einen Fehler im Code haben.
Seht ihr villeicht den Fehler?


list_alle:=
test:
test;

list_alt := @If(Licence = ""; "GIWISPump";Licence);
list_neu := @Prompt([OkCancelListMult]; "Auswahl"; "Bitte wählen Sie!"; list_alt; list_alle);
list_hidden := ConnectorLicence1 ;
@If(list_neu = ""; @Return(""); "");

list_neu[1] = list_hidden[1] :
@If(list_neu[1] = list_hidden[1];@Prompt([ok];"title";"ok"); "");



@SetField("Licence"; list_neu);
@SetField("ConnectorLicence1"; list_neu + "$" + @Text(Valid));
   
@Command( [ViewRefreshFields] )



Offline diali

  • Gold Platin u.s.w. member:)
  • *****
  • Beiträge: 1.023
  • Geschlecht: Männlich
Re: Vergleiche
« Antwort #1 am: 22.12.05 - 10:50:24 »
kann es an dem Dopplepunkt hinter dem "list_neu[1] = list_hidden[1] :" liegen?, dies müsste doch ein Semikolon sein.
Gruß
Dirk

Offline Michael84

  • Frischling
  • *
  • Beiträge: 49
Re: Vergleiche
« Antwort #2 am: 22.12.05 - 10:53:18 »
hallo diali,
daran lag es auch ,hab den Fehler so eben gefunden.... :-)
Weisst du vielleicht auch wie ich schauen kann ob list_neu[1] überhaupt in list_hidden enthalten ist ?

Grüße Michael

Offline diali

  • Gold Platin u.s.w. member:)
  • *****
  • Beiträge: 1.023
  • Geschlecht: Männlich
Re: Vergleiche
« Antwort #3 am: 22.12.05 - 10:57:33 »
es würde über eine Schleife gehen oder mit Implode einen String aus der Liste machen und dann mit Contains abfragen.

@if(@Contains("#" + @Implode(list_hidden;"#") + "#"; list_neu[1]); ...; ...)
Gruß
Dirk

Offline umi

  • Gold Platin u.s.w. member:)
  • *****
  • Beiträge: 2.062
  • Geschlecht: Männlich
  • one notes to rule'em all, one notes to find'em....
    • Belsoft AG
Re: Vergleiche
« Antwort #4 am: 22.12.05 - 11:09:45 »
oder mit @ismember
Gruss

Urs

<:~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Jegliche Schreibfehler sind unpeabischigt
http://www.belsoft.ch
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~:>

Offline diali

  • Gold Platin u.s.w. member:)
  • *****
  • Beiträge: 1.023
  • Geschlecht: Männlich
Re: Vergleiche
« Antwort #5 am: 22.12.05 - 11:13:33 »
... und da standen wieder die vielen Bäume vorm Wald  ;)
@IsMember ist natürlich besser.
Gruß
Dirk

Offline Michael84

  • Frischling
  • *
  • Beiträge: 49
Re: Vergleiche
« Antwort #6 am: 22.12.05 - 11:45:35 »
Hallo ihr beiden ,
ich hab das jetzt mit ISmember gelöst :)

REM{Schleife};@For(
@If(@IsMember(list_neu[1]; @Left(list_hidden; "$"));
   @Prompt([Ok];"title";"ok");
   @Prompt([Ok];"title";"bad")
);
REM{Schleife};

Zu guter letzt hät ich gerne eine For Schleife drumrum..leider komme ich absolut gar nicht mit der Hilfe klar.
Wie würde hier die Schleife aussehen?

Ganz liebe Grüße Michael

Offline umi

  • Gold Platin u.s.w. member:)
  • *****
  • Beiträge: 2.062
  • Geschlecht: Männlich
  • one notes to rule'em all, one notes to find'em....
    • Belsoft AG
Re: Vergleiche
« Antwort #7 am: 22.12.05 - 12:38:27 »
Für was hast Du da denn die For schleife? Da reicht doch die @ismember?
Gruss

Urs

<:~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Jegliche Schreibfehler sind unpeabischigt
http://www.belsoft.ch
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~:>

Offline Michael84

  • Frischling
  • *
  • Beiträge: 49
Re: Vergleiche
« Antwort #8 am: 22.12.05 - 13:18:15 »
in meinen Beispiel wird nur nach dem ersten Wert in ist_neu geschaut,ich möchte aber das er alle werte vergleicht.
Mit der For Schleife würde ich dies gerne lösen. Nur wie macht man so was  :-:

Offline umi

  • Gold Platin u.s.w. member:)
  • *****
  • Beiträge: 2.062
  • Geschlecht: Männlich
  • one notes to rule'em all, one notes to find'em....
    • Belsoft AG
Re: Vergleiche
« Antwort #9 am: 22.12.05 - 13:23:35 »
Ungefähr so

@For(n:=1;n<@elements(list_neu);
n:=n+1;
@prompt([OK];"";@if(@ismember(list_neu[n];list_hidden);"ist drin";"ist nicht drin"))
);
Gruss

Urs

<:~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Jegliche Schreibfehler sind unpeabischigt
http://www.belsoft.ch
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~:>

 

Impressum Atnotes.de  -  Powered by Syslords Solutions  -  Datenschutz