Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi Problem mit Value List Editor (https://www.delphipraxis.net/125572-problem-mit-value-list-editor.html)

I love Delphi 8. Dez 2008 17:51


Problem mit Value List Editor
 
Hallo Leute,
habe ich ziemlich merkwürdiges Problem:

Ich fülle einen ValueListEditor mit einer Funktion, leere ihn jedoch vorher.
Wenn ich diese Funktion dann jedoch nochmal aufrufe erhalte ich irgendwelche Zugriffsfehler!

Hier der Code:
Delphi-Quellcode:
begin
  //Form5 Füllen
  Form5.EditName.Text:=LVCatalogs.Selected.Caption;
  Form5.EditDiscription.Text:=LVCatalogs.Selected.SubItems[0];
  Form5.EditRow.Text:=IntToStr(LVCatalogs.ItemIndex);
  Form5.EditFile.Text:=LVCatalogs.Selected.SubItems[1];
  //Vorgabe-Daten-Felder auffüllen
  Katalog.Text:='';
  Katalog.LoadFromFile(Stammverzeichnis+'Kataloge\'+LVCatalogs.Selected.SubItems[1]);
  Form5.Edit1.Text:=Katalog.Strings[0];
  Form5.EditSubName.Text:=Katalog.Strings[1];
  Form5.Memo_Discription.Text:=StringReplace(Katalog.Strings[2],'\break',#13#10,[rfReplaceAll]);
  //Den Rest dynmisch auslesen, nachdem geleert
  i:=0;
  Form5.VLE.Strings.Clear;
  //while Form5.VLE.Strings.Count > 0 do
  //  begin
  //  Form5.VLE.Strings.Delete(0);
  //  end;

  //i:=0;
  //while i < Katalog.Count-3 do
  //  begin
  //  Tmp.Text:='';
  //  ExtractStrings([';'],[], PChar(Katalog.Strings[i+3]), Tmp);
  //  if Tmp.Strings[1] = '\empty' then Tmp.Strings[1]:='';
  //  Form5.VLE.Strings.Add(Tmp.Strings[0]+'='+Tmp.Strings[1]);
  //  i:=i+1;
  //  end;
  Form5.Show;
Ich hoffe, ihr könnt helfen!!!

Danke schonmal,
Mann aus Delphi

toms 14. Dez 2008 19:26

Re: Problem mit Value List Editor
 
Hallo

Bei welcher Zeile kommt denn der Fehler?


Alle Zeitangaben in WEZ +1. Es ist jetzt 11:49 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz