Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by CReber,
11. Nov 2004
with lvGroups do begin
if SelCount>0 then
for i:=0 to Items.Count-1 do
if Items.Selected then begin
GrpName:=InputBox('Gruppe ändern', Name ändern:', Items.Caption);
Das ist mir grad noch eingefallen. Aber irgendwie sieht das unelegant aus ;)
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by CReber,
11. Nov 2004
with lvGroups do
if SelCount>0 then
for i:=0 to SelCount-1 do begin
GrpName:=InputBox('Gruppe ändern', 'Name ändern:',Selected.Caption);
Das Selected.Caption funktioniert nicht. Was muss ich stattdessen eingeben um jedes selektierte durchzulaufen?
// Edited: Es handelt sich um eine ListView