Dynamisch erzeugte Panels und Controls

[Cosamia]

Zitat von KrasserChecker:

Dafür gibt es die Eigenschaft "Tag".
Einfach beim Spinedit den Zeiger auf das Editfeld eintragen und bei Bedarf wieder auslesen:

Beim Initialisieren:

Delphi-Quellcode:

with NewSpinBtn do begin 
...
Tag := Integer(NewEdit);
...
end;

Dann später im Event:

Delphi-Quellcode:

procedure TForm1.MyBottomClick(Sender: TObject);
begin
...
  TLabeledEdit(Pointer((Sender as TJvSpinbutton).Tag))).Text := IntToStr((Sender as TJvSpinbutton).Value);
...
end;

Vielen Dank. Funktioniert wunderbar.