Hallo D'ler.
Mit folgendem Code kann ich mir die Position eines Items in einer ListBox anzeigen lassen (PopUpMenu)
Delphi-Quellcode:
procedure TForm1.ListBox1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
var
Idx: Integer;
Name: String;
begin
Idx := ListBox1.ItemAtPos(Point(X,Y), True);
if Idx<>-1 then
begin
Titel1.Caption := Format('%d', [Idx]);
Name1.Caption := Format('%s', [Name]);
Ordner1.Caption := Format('%s', [Dir]);
end
else
Titel1.Caption := 'Keine Angabe';
Name1.Caption := 'Keine Angabe';
Ordner1.Caption := 'Keine Angabe';
end;
Das Problem besteht jetzt darin, dass ich nicht den Namen ([Name]) des Items und dessen
Speicherort ([Dir]) angezeigt bekomme.
Was mache ich falsch?