Pointer Problem

[braingrenade]

Moin Leute !


ich will den Wert der Adresse eines pointers verändern :

Delphi-Quellcode:

var
i : integer;
p : ^integer;

procedure z ;
begin
p^ := 10 ;
end;

das gibt bei mir nen fehler!

[Duffy]

Hallo,
und worauf zeigt der Zeiger, vermutlich ist das Nirwanna, die ewigen Jagdgründe des Halbleiters.
Versuch's mal so

Delphi-Quellcode:

var 
i : integer; 
p : ^integer; 

procedure z ; 
begin
P := @i; 
p^ := 10 ; 
end;

bye

[APP]

Hallo,

aus der OH:
Das folgende Beispiel zeigt, wie Zeiger funktionieren:

Delphi-Quellcode:

    var
      X, Y: Integer;   // X und Y sind Integer-Variablen
      P: ^Integer;     // P zeigt auf einen Integer
    begin
      X := 17;         // Einen Wert an X zuweisen
      P := @X;         // Adresse von X an P zuweisen
      Y := P^;         // P dereferenzieren; Ergebnis an Y zuweisen
    end;

[braingrenade]

Moin duffy !

das weiß ich eigentlich schon , habs nur vergessen hinzuschreiben:roll:
naja , egal ,hier der richtige code , der der die probleme verursacht:

Delphi-Quellcode:

...
synapsen[i2].inputneuronen :=  @inputneuronen[i];
...
if inputneuronen[i].indentifier = 
synapsen[i2].inputneuronen^.indentifier^ then ....//Pointer type required
...
synapsen[i2].inputneuronen^.input^ :=  
synapsen[i2].inputneuronen^.input^ + ... //Pointer type required 
...

hoffentlich wird's jetzt klar !

[Duffy]

Hallo,
Du solltest besser noch die Struktur des Records und der beteiligten Variablen bereitstellen, dann wird das Problem vielleicht besser sichtbar. Auf jeden Fall passen da schon mal zwei Pointer Typen nicht zueinander.

bye

[braingrenade]

jop, hier isses :

Delphi-Quellcode:

type Tneuron = object
   schwellenwert : integer;
   input : integer;
   output : integer;
   indentifier : Integer;
end;

type Tsynapse = object
   durchlass : integer;
   benutzung : Integer;
   inputneuronen :  ^Tneuron;
   outputneuronen :  ^Tneuron;
   indentifier : Integer;
end;

[Duffy]

Hallo,
lass mal bei indentifier^ das ^ weg. Du hast da eine Integer Variable, die kein Zeiger ist.

bye

[braingrenade]

Moin !

Nee, nee ,ich will eigenltich nur feststellen ob welches neuron die synapse anpointet !

[Duffy]

Hallo,
wenn es Dir nichts ausmacht, dann kannst Du mir mal dein Projekt mailen.
Ich schau dann mal, wasi ich für Dich tun kann. OK?

bye

PS. Eine Stunde mache ich noch ....

[Christian Seehase]

Moin Braingrenade,

da identifier und output als integer und nicht als Pointer deklariert sind, kannst Du auch nicht dereferenzieren (also ^ verwenden).

Warum hast Du das eigentlich als object deklariert?

Zitat:

Zitat von Delphi-Hilfe

Objekttypen werden nur aus Gründen der Abwärtskompatibilität unterstützt und sollten in neuen Anwendungen nicht mehr verwendet werden.

Solange nur Daten enthalten sind wäre wohl record, packed record sinnvoller.

[braingrenade]

Moin!

ich will eigentlich nur vergleichen ob der pointer synapsen[i2].inputneuron auf das neuron inputneuron[i] pointet .

das mit den objecten hab ich nicht gewußt , aber müsste doch eigentlich egal sein oder ?


am besten ist ich häng den Code mal hier ran dann kann jeder der will das teil mal anschauen.

[Duffy]

Hallo,
deine Mail hat mich erreicht, kann aber die neuro22.zip nicht öffnen. Die Länge ist 0. Bitte nocheimal senden.

Danke

bye

[Duffy]

Hallo nocheinmal,
versuch es jetzt nocheinmal. Beim zweiten mal drücken Init Buttons bekomme ich noch eine Access violation

bye

[braingrenade]

Jeeeeeehhhhaaaaaaaa!

funtzt soweit , sind zwar noch bugs drin aber egal !

[Duffy]

Hallo,
gern geschehen ....

bye