Forum: Programmieren allgemein
Delphi
by padavan,
20. Okt 2005
ich unterhalt mich zwar die ganze Zeit mir selbst, aber egal.... :cheers: :roteyes:
aber nun stehe ich vor dem nächsten Problem.
in die Listview etwas einfügen habe ich so gemacht:
procedure TForm1.Button2Click(Sender: TObject);
var
i: integer;
begin
Forum: Programmieren allgemein
Delphi
by padavan,
20. Okt 2005
hab´s so gelöst, nicht schön aber selten
procedure TForm1.ListView1KeyPress(Sender: TObject; var Key: Char);
var selected: integer;
begin
if (key = '-') and (listview1.selcount > 0) then begin
try
selected := Listview1.itemindex + 1;
listview1.items.Insert(Listview1.itemindex + 2);
Forum: Programmieren allgemein
Delphi
by padavan,
20. Okt 2005
Hmm, jetzt muss ich aber doch nochmal was dazu fragen...
bei der Listbox habe ich via + oder - realisiert, dass man den Eintrag hoch bzw. runter setzen kann
if key = '+' then begin
try
listbox1.Items.Exchange(listbox1.ItemIndex,listbox1.ItemIndex-1);
listbox1.ClearSelection;
except
Forum: Programmieren allgemein
Delphi
by padavan,
20. Okt 2005
klar sind sie das,
wollte nur sicherstellen, dass ich keine Funktion übersehen habe, welche das schon kann.
Ist mir schonmal passiert, hab irgendwas mit hammermäßig viel Code umschifft und danach gemerkt, dass es das längst in der Klasse gibt....
Und wollte quasi die Bestätigung bekommen, dass ein Drag & Drop innerhalb der Listbox bei aktiviertem Multiselect nicht gescheit funktioniert...
Forum: Programmieren allgemein
Delphi
by padavan,
20. Okt 2005
Guten Morgen Delphianer,
habe einiges zum Thema Listbox und Listview gefunden was mich zur folgenden subjektiven Meinung führt:
Vorteile einer Listbox:
1. Speichern und laden in eine Datei sehr simpel
2. Einfaches handling innerhalb des Programmcodes (oft nur eine Zeile - Beispiel "exchange")
Nachteile
1. Nur eine Spalte