ListBox1.Items.LoadFromFile('test.txt');

[taktaky]

Hallo,

mit dem Code holen wir den Inhalt von test.txt in die ListBox1

ListBox1.Items.LoadFromFile('test.txt'); Ich möchte aber nur eine bestimte Zeile in ListBox1 zuweisen
ListBox1.Item[2].LoadFromFile('test.txt'); // gehlt aber nicht ! funktioniert der Befehl loadfromfile nur mit Listen und nicht mit Einzelzeilen wie Edit.Text ?

so z.B. funktioniert aber nur wenn ListBox1 nicht leer ist !!!
ListBox1.Items[2]:=Edit1.text;

[leddl]

LoadFromFile ist eine Methode der Klasse TStrings (Items), Items[2] ist aber ein String. Und String hat diese Methode leider nicht Kann also gar nicht gehen

Lade dir zum Beispiel die Datei in eine neue StringList und füge dann zu deiner ListBox nur die gewünschte Zeile hinzu.

//Edit:

Zitat von taktaky:

so z.B. funktioniert aber nur wenn ListBox1 nicht leer ist !!!
ListBox1.Items[2]:=Edit1.text;

Das ist ja auch was komplett anderes Hier weißt du einem String (Items[2]) einen anderen String zu. Daher kein Problem. Wenn du natürlich in der ListBox nur ein Element hast, dann schlägt die Zuweisung fehl, weil natürlich Item[2] nicht existiert, Logo

//nochmal Edit:
vielleicht noch ein bißchen Code zur Veranschaulichung:

Delphi-Quellcode:

var aStringList : TStrings;
...
//StringList erstellen und aus der Datei laden
aStringList := TStringList.Create();
aStringList.LoadFromFile('test.txt');

//vielleicht noch die Listbox leeren
aListBox.Clear;
//gewünschtes Item einfügen
aListBox.items.Add(aStringList[2]);

aStringList.free;

[taktaky]

Hallo,

ich wollte mit der gleichen Idee Werte yuerst speichern, bekomme ich Meldung
Identifier redeclared: 'aString'

hier ist der Code

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var aStringlist: TStringlist;
//..
aStringlist := TStringlist.Create;
aStringlist.Add('zeile1');
aStringlist.Add('zeile2');
aStringlist.Add('zeile3');
aStringlist.SaveToFile('test.txt');
aStringlist.Free;
end;

end.

[Nuclear-Ping]

Seit Monaten die gleichen und immer wieder die gleichen Fragen ...

Du kopierst einfach, ohne nur einen einzigen Funken deines Gehirns anzustrengen. Meine Güte ... Und wenn mal was nicht funktioniert, selber mal nachdenken ist ein Fremdzustand. Nein, da rennt man lieber ins Forum und lässt irgendeinen Hansel seine Syntaxfehler korrigieren, irgendeiner wird sich schon finden ...

Wenn wir schon dabei sind: Schonmal was von "begin" gehört?

[taktaky]

Hi

das war wirklich dumm von mir

Was auch koemisch finde, dass Delphi seine Hand auf seinen Kopf legt und beschwert, dass er Bauchschmerzen hat

Wenn ich den Felher lese, verstehe ich nicht was ihm fehlt

Gruß

[DeddyH]

Was ist an Identifier redeclared: 'aString' schwer zu verstehen?

[taktaky]

Hallo,

was ist nun mit ListBox1? was ist der Unterschied zwi aListBox und ListBox1
ich bekomme beim auslesen : undeclared 'aListBox'

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject);
var aStringList : TStrings;

begin

//StringList erstellen und aus der Datei laden
aStringList := TStringList.Create();
aStringList.LoadFromFile('test.txt');

//vielleicht noch die Listbox leeren
aListBox.Clear;
//gewünschtes Item einfügen
aListBox.items.Add(aStringList[2]);

aStringList.free;

end;

[DeddyH]

Du musst doch wissen, wie die Komponenten auf Deinem Formular heißen *indieTischkantebeiß*

[taktaky]

Ok, habe ich auch gedacht

es funktioniert jetzt aber gerne möchte ich den Wert in eine bestimmte Zeile einfügen

Delphi-Quellcode:

aListBox.items.Add(aStringList[2]); // so will ich nicht
aListBox.items[3].Add(aStringList[2]); // so wunschte ich, aber was fehlt ?