Hallo Michael,
fangen wir hinten an:
Zitat von
Luckie:
... Als Objektname wird mir immer der Name des ersten Objektes angezeigt. Egal auf welchen Eintrag ich in der Listbox klicke. ...
heißt das, idx ist immer 0?
Delphi-Quellcode:
procedure TForm1.ListBox1Click(Sender: TObject);
var
idx: Integer;
begin
idx := PageCollection.FindItemByName('Page' + IntToStr(LBCurrentIndex));
if idx <> -1 then
begin
// ...
end;
lblCurrPage.Caption := Format('Aktuelle Seite: %s', [PageCollection.Items[LBCurrentIndex].Name]);
end;
Ich würde dann mal zuerst LBCurrentIndex überprüfen (heiß), anschließend die Methode FindItemByPage() - wenn noch nötig.
Freundliche Grüße