routine aendern(speichern in listbox>speichern in hashtable)

[nimmersattXD]

ok jetzt startet das pogramm schonmal!

diese zeile macht er auch:

Delphi-Quellcode:

 LiBoUsed.ItemIndex:=LiBoUsed.Items.Add(key);

nur bei der hier bekomm ich eine access violation fehlermeldung:

Delphi-Quellcode:

 LiBoUnused.ItemIndex:=LiBoUnused.Items.Add(dummy2^);

[nat]

war grad am bearbeiten von meinem vorigen beitrag.
also siehe vorigen beitrag von mir :)

[nimmersattXD]

aehm eigentlich will ich ja zusaetzlich zu dem key noch einen string speichern, das beides gehoert zusammen, und wenn ich den key suche dann moechte ich gern die data dazu auch haben, ich mein wozu is dieses data sonst da? oder is das von anfang an nur so gedacht worden, dass da ein dummy genutzt wird ... wenn das so ist brauch ich eine neue hashtable-unit, weil ich gern noch zusaetzlich was speichern moechte!!

[nat]

kannst du doch auch!
du übergibst Add den key und dann einen pointer auf deine daten.
was das für daten sind ist total egal.
in meinem beispiel oben ist das ein string. wenn du mehrere felder
speichern willst, dann übergibst du einen pointer auf einen
record.

[nimmersattXD]

ah ok jetzt hab ichs verstanden, jetzt hat mein programm nur noch ein problem mit dem P:=StrNew(key); weil key ein string is und p ein pansichar, gibt es moeglichkeiten konvertierung wie bei strtofloat oder sowas?



[add] hat sich erhledigt :) habn bissel rumgegoogelt und problem loesst sich wenn ich PAnsiChar(key) schreibe :D ich glaub jetzt bin ich mit meinem programm fertig, waere zumindest toll...mal den chef fragen :D

[nat]

Zitat:

Zitat von nat

du könntest es in der art machen (so ausm kopf)

Delphi-Quellcode:

var
  P: PChar;
begin
...
  P := StrNew(PChar(key));
  Dict.Add(filename, P);
...
end;

//später dann
  ...
  Dict.Find(filename, P);
  showmessage(StrPas(P));  //oder mache irgendetwas anderes mit dem string
  ...

//wenn du ihn nicht mehr brauchst:
  StrDispose(P);

also hättest du das 1:1 übernommen, dann hättest du das problem
nich gehabt P := StrNew(PChar(key));