Entwickler-Ecke
Grafische Benutzeroberflächen (VCL & FireMonkey) - Listbox.Item := Datei
Sauger Chris - Sa 08.05.04 21:00
Titel: Listbox.Item := Datei
Hallo
Ich brauche einen Quellcode
der mir zu einem ausgewählten Item einen text in eine memo komp.
ladet.
so wie das Item heiß so soll auch die Datei heißen
Danke
Gruß
Sauger Chris (Delphi7)
Karlson - Sa 08.05.04 21:14
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
| if listbox1.itemindex >= 0 then
begin
memo1.lines.add(listbox1.items[listbox1.itemindex]);
end
else
begin
showmessage('z.B. kein Eintrag ausgewählt');
end;
end; |
Das addet den momentan markierten Listboxeintrag in memo1.
Und für den weiteren Teil wäre ganz sinnvoll wenn du dir 5 Minuten Zeit genommen hättest, um den Text so zu formulieren das man auch was versteht...:(
Warum Datei?? Willst du das Memo dann noch als Datei abspeichern oder was?!
Wenn ja:
Delphi-Quelltext
1:
| memo1.lines.savetofile('c:\kalle\' + listbox1.items[listbox1.itemindex]); |
Sauger Chris - Sa 08.05.04 21:33
Titel: Listbox1.itm := Text laden
Ja sorry :oops: hier besser
allso ich will das z.b
1 item soll hallo.txt laden
2 item soll hallo2.txt laden
3-999 usw.
die datei (Text-Datei) heißt genau wie das item
wie kann ich das machen
Danke
Gruß
Sauger Chris(Delphi7)
jjturbo - Sa 08.05.04 21:46
Hi,
folgender Code sollte Dir die Datei mit dem Namen, der in der Listbox angewählt ist, in Dein Memo laden.
Habe es nicht probiert, sollte aber gehen.
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
| procedure TForm1.ListBox1Click(Sender: TObject);
begin
if ListBox1.ItemIndex > 0
then Memo1.Lines.LoadFromFile(ListBox1.Items[ListBox1.ItemIndex])
else ShowMessage('Nichts ausgewählt');
end; |
Gruß, jjturbo
Sauger Chris - Sa 08.05.04 21:55
Titel: listbox1.item := Datei
:D Jo :D
Danke
Gruß
Sauger Chris(Delphi7)
Karlson - So 09.05.04 01:29
Moment noch! Es muss >= 0 heissen! Denn der erste Eintrag in der Listbox ist Eintrag 0.
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!