Hallo zusammen,
habe da ein Problem,
ich will aus einer
XML Datei...
XML-Code:
<?
xml version="1.0" encoding="ISO-8859-1"?>
<Schülerdaten>
<id><Name>D</Name><Vorname>Christian</Vorname><Note>1</Note><gewählt>Ja</gewählt><joker>Ja</joker></id>
<id><Name>R</Name><Vorname>Andreas</Vorname><Note>6</Note><gewählt>Nein</gewählt><joker>Nein</joker></id></Schülerdaten>
Einen zufalsgenerator machen, der mir zufällig einen Namen ausspuckt und dabei lernt ob jemand schon dran war oder nicht.
In Delphi habe ich das so gelöst...
Delphi-Quellcode:
Function zufall():integer;
Var x,y,z:integer;
begin
z:=ID.length;
y:=ID.length;
ShowMessage(inttostr(ID.length));
x:=0;
If x <> y Then
Begin
Randomize;
result:=Random(z);
ShowMessage(inttostr(result));
If xmldoc.documentElement.selectSingleNode('/Schülerdaten/id[ID="'+inttostr(result)+'"]/gewählt').Text = 'Ja' Then
Begin
x:=x+1;
zufall;
End
Else xmldoc.documentElement.selectSingleNode('/Schülerdaten/id[ID="'+inttostr(result)+'"]/gewählt').Text:='Ja';
end
else Showmessage('Alle Schüler wurden benotet!');
End;
Nur Leider bekomme ich wärend der Laufzeit ein Fehlermeldung like...Zugriffsverlezung bei Adresse...usw....hier
If xmldoc.documentElement.selectSingleNode('/Schülerdaten/id[ID="'+inttostr(result)+'"]/gewählt').Text = 'Ja' Then
ich glaube da stimmt was nicht mit dem Aufruf der
XML datei.
Besten dank an alle.
Cyberbob