Pointer: PZeiger('Anker.' + Kriterium)

[foerster7892]

HI,
also ich wollte fragen ob man das so machen kann bzw wie es richtig geht um auf ein Element eines records einer Liste zuzugreifen???
Pointer:

Delphi-Quellcode:

PZeiger('Anker.' + Kriterium) {Kriterium ist ein string}

danke für die hilfe

[DeddyH]

PZeiger ist ein Pointer auf einen TZeiger-Record oder wie?

[foerster7892]

bsp:

Delphi-Quellcode:

type
  PZeiger=^TElement;
  TElement=Record
  Spielname, Genre, Altersbeschraenkung, Preis : String;
  next: PZeiger;
  end;

muss man das irgendwie mit findcomponent machen???

[DeddyH]

Delphi-Quellcode:

var z: PZeiger;
  ...
  ShowMessage('Anker.' + z^.Kriterium);

[foerster7892]

ich will es ja nciht anzeigen ich will ja das etwas eingegeben wird und dann sortiert er entweder nach Spielname, Genre .... durch das oben genannte da auf Kriterium der string für Genre, Spielname etc liegt!
das hab ich fertig
bis auf das ich das gleiche(den ganzen Algorithmus) 4mal kopieren müsste mit jeweils
p1.Spielname
p1.Genre
.
.
.
und genau da liegt das Problem!

[DeddyH]

Sry, ich hab nicht ein Wort verstanden :pale:

[edit] Vielleicht hilft das hier ja weiter. [/edit]

[foerster7892]

jemand wählt in einer radiogroup entweder Spielname, Genre etc aus
ich lese das aus und leg je nachdem was er gehwählt hat den entsprechenden Begriff auf Kriterium als string
dann soll er irgendwie das machen 'p1.' + Kriterium (var p1 :PZeiger) um dort den wert zB mit einem anderen zu vergleichen

hab ich es jetzt richtig erklärt? :?: :gruebel:

[DeddyH]

Zitat:

Zitat von foerster7892

dann soll er irgendwie das machen 'p1.' + Kriterium (var p1 :PZeiger)

Wenn Du Dir keine Mühe bei den Fragen geben willst, gebe ich mir auch keine bei den Antworten. Schau Dir mein Edit oben einmal an oder verwende statt der Records gleich eine Klasse, die Du mit TObjectList verwalten (und sortieren) kannst.

[Klaus01]

.. aber Kriterium ist kein Element Deines Records

Delphi-Quellcode:

type
  PZeiger=^TElement;
  TElement=Record
    Spielname, Genre, Altersbeschraenkung, Preis : String;
    next: PZeiger;
  end;

Delphi-Quellcode:

var
 p1: PZeiger;

begin
  new(p1);
  p1^.spielname:='irgendwas';
  p1^.Genre:='was anderes';
  p1^.Altersbeschränkung:='ein Alter'; // warum hier ein String?
  p1^.preis:='ein Preis'; // warum auch hier ein String?
  p1^.next:=nil;
end;

Grüße
Klaus

[foerster7892]

genau sondern eine eine variable vom typ string
und die enthält entweder Spielname oder genre oder ... .

sorry wenn ich mir nicht genug mühe gebe ich versuch ja zu erklären was ich will aber irgendwie gelingt es mir nicht so recht^^.